Metrics for powComplex, imaginary part

start0.0ms (0%)

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

analyze918.0ms (10.3%)

Memory

-19.2MiB live, 599.5MiB allocated; 842ms collecting garbage

Algorithm

1×

Search

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

Compiler

Compiled 39 to 18 computations (53.8% saved)

sample2.7s (30.2%)

Memory

44.3MiB live, 3 340.6MiB allocated; 778ms collecting garbage

Samples

1.2s	2 901×	1	valid
858.0ms	5 287×	0	valid
47.0ms	68×	2	valid

Precisions

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

ival-mult!: 415.0ms (24.2% of total)

ival-sin: 292.0ms (17% of total)

ival-hypot: 285.0ms (16.6% of total)

ival-log: 266.0ms (15.5% of total)

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

ival-atan2: 130.0ms (7.6% of total)

adjust: 123.0ms (7.2% of total)

ival-add!: 43.0ms (2.5% of total)

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

Bogosity

preprocess76.0ms (0.9%)

Memory

-7.1MiB live, 44.8MiB allocated; 10ms collecting garbage

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	141	575
1	485	556
2	1777	552
3	7796	552

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

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

Status

Accuracy

Program

▶

42.6%

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

series182.0ms (2%)

Memory

34.1MiB live, 311.7MiB allocated; 40ms collecting garbage

Counts

19 → 272

Calls

Call 1

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

Calls

12 calls:

Time	Variable		Point	Expression
60.0ms	y.re	@	0	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
13.0ms	x.im	@	0	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
12.0ms	y.im	@	0	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
11.0ms	x.im	@	inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
11.0ms	x.re	@	inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))

rewrite207.0ms (2.3%)

Memory

-11.0MiB live, 222.8MiB allocated; 41ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1580	20000
0	1609	19518
0	8263	16639

Stop Event

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

Counts

291 → 337

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

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

eval45.0ms (0.5%)

Memory: 19.3MiB live, 61.9MiB allocated; 8ms collecting garbage
Compiler: Compiled 13 701 to 2 651 computations (80.7% saved)

prune31.0ms (0.3%)

Memory

1.0MiB live, 45.5MiB allocated; 7ms collecting garbage

Pruning

21 alts after pruning (21 fresh and 0 done)

	Pruned	Kept	Total
New	306	21	327
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	307	21	328

Accuracy

93.9%

Counts

328 → 21

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	22.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))) (sin.f64 (/.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)))))
	15.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))) (sin.f64 (/.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)))))))
	19.0%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #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)))))))
▶	53.9%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
	34.4%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #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))))))
	37.4%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #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))))))))
	8.7%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)))))))))))
	48.2%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (.f64 (cos.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)))))))))
	31.7%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (.f64 y.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 (.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 (.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)))))) (atan2.f64 x.im x.re)))))))
	41.0%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 y.re (.f64 (cos.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))))))
	34.6%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 #s(approx (+ (* x.re x.re) (* x.im x.im)) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 #s(approx (+ ( x.re x.re) (* x.im x.im)) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	33.8%	(.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))) (sin.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))))
	33.8%	(.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))) (sin.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))))
▶	16.9%	(.f64 (exp.f64 (-.f64 #s(approx ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im)))) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	15.5%	(.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 (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 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	31.2%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)) (sin.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	26.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)))) (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 (.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 (.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 (.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 (.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 (.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 (.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 (.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 (.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 (.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 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.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))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
▶	35.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)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))
	29.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)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))
	24.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)))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))

Compiler

Compiled 1 968 to 1 390 computations (29.4% saved)

series557.0ms (6.3%)

Memory

24.5MiB live, 803.2MiB allocated; 136ms collecting garbage

Counts

58 → 626

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

Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (sin (* 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 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.im 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 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* y.re (log x.re))))
#s(approx (log x.re) #s(hole binary64 (log x.re)))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) #s(hole binary64 (* y.re (log x.im))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (/ (* (* x.re x.re) y.re) (* x.im x.im)) #s(hole binary64 (/ (* (pow x.re 2) y.re) (pow x.im 2))))
#s(approx (* (* x.re x.re) y.re) #s(hole binary64 (* (pow x.re 2) y.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))))))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))))) (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (/ (* (pow x.re 2) (* (pow y.im 2) (log x.im))) (pow x.im 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log x.im) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow y.im 2) (pow (log x.im) 2)) (/ (* (pow x.re 2) (* (pow y.im 2) (log x.im))) (pow x.im 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2)))))
#s(approx (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/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 (- (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (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)))) (* 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)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.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)))) (* y.re (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)))) (* 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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.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)))) (* y.re (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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (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)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* 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))))))
#s(approx (* (sin (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* 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))))) (* (sin (* 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)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.im 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 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #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)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (log x.re) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) #s(hole binary64 (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) #s(hole binary64 (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (/ (* y.re (log x.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))))))
#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))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.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)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* 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 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* 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)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 6) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (+ (/ (* (pow y.im 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)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ 1 x.re)) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (+ (/ (* (pow y.im 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)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (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)))) (* 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)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.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)))) (* y.re (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)))) (* 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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.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)))) (* y.re (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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (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)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* 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))))))
#s(approx (* (sin (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* 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))))) (* (sin (* 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)))))))
#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 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.re)))))))
#s(approx (log x.re) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (log (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))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.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)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* 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 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* 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)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 6) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (+ (/ (* (pow y.im 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)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.re)) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (+ (/ (* (pow y.im 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)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (sin (* 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 (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) #s(hole binary64 (/ (+ (* 1/2 (* (pow x.re 2) y.re)) (* (pow x.im 2) (* y.re (log x.im)))) (pow x.im 2))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (log x.im))))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))))))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))) (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (/ (* (pow x.im 2) (* (pow y.im 2) (log x.re))) (pow x.re 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log x.re) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow y.im 2) (pow (log x.re) 2)) (/ (* (pow x.im 2) (* (pow y.im 2) (log x.re))) (pow x.re 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/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 (- (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #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)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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)))) (* 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)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.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)))) (* y.re (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)))) (* 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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.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)))) (* y.re (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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (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)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* 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))))))
#s(approx (* (sin (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* 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))))) (* (sin (* 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)))))))
#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 (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (* (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))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.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)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* 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 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* 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)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 6) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ 1 x.im)) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (+ (/ (* (pow y.im 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)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ 1 x.im)) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (+ (/ (* (pow y.im 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)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #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)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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)))) (* 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)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.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)))) (* y.re (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)))) (* 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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.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)))) (* y.re (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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (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)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* 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))))))
#s(approx (* (sin (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* 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))))) (* (sin (* 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)))))))
#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 (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (* (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))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.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)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* 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 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* 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)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 6) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (+ (/ (* (pow y.im 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)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (+ (/ (* (pow y.im 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)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* 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)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* 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 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* 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)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (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) 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))))))))) (* (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)))) (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)))) (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 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* 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)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (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) 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))))))))) (+ (* y.re (+ (* -1/2 (* (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)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -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 (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 (* y.im (log (sqrt (+ (pow x.im 2) (pow 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) (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)))) (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)))) (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 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -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))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -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))) (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (pow (atan2 x.im x.re) 7))) (* 1/120 (pow (atan2 x.im x.re) 5)))))) (atan2 x.im x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.re))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (sin (* y.im (log x.re))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.re)))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 2) (sin (* y.im (log x.re)))))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (sin (* y.im (log x.re)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.re)))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 2) (sin (* y.im (log x.re)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 3) (sin (* y.im (log x.re)))))) (* 1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (sin (* y.im (log x.re)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.re))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) #s(hole binary64 (* y.re (+ (log x.im) (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* 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 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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.re (+ (* -1/2 (* (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) 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))))))))) (* (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)))) (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)))) (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 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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.re (+ (* -1/2 (* (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) 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))))))))) (+ (* y.re (+ (* -1/2 (* (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)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -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 (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 (* y.im (log (sqrt (+ (pow x.im 2) (pow 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) (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)))) (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)))) (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 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (* 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)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (log x.re))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (log x.re) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (atan2 x.im x.re)))))
#s(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 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log x.re)) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.re)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log x.im)) (* -1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #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))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (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))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.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)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (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)))) (+ (* y.im (+ (* -1 (* (cos (* 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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/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))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.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)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (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)))) (+ (* y.im (+ (* -1 (* (cos (* 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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/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)))) (* y.im (+ (* -1/6 (* (cos (* 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 (* 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 (* 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 (* 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))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (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))) (* (log x.re) (pow x.re y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* 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))) (* (log x.re) (pow x.re y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re y.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.re y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))) (pow x.re y.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.re y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (* (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))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (* (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)))) (+ (* y.im (+ (* -1 (* (cos (* 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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/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))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (* (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)))) (+ (* y.im (+ (* -1 (* (cos (* 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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/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)))) (* y.im (+ (* -1/6 (* (cos (* 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 (* 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 (* 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 (* 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))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* 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 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.im (- (/ (* y.re (log x.re)) y.im) (atan2 x.im x.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (pow y.im 2))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log x.re)) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.re)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.re (atan2 x.im x.re)) y.im))))))

Calls

12 calls:

Time	Variable		Point	Expression
80.0ms	y.re	@	inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (log x.re) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im)) (* (* x.re x.re) y.re) (* y.re (log x.im)) (log x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))
69.0ms	x.re	@	0	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (log x.re) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im)) (* (* x.re x.re) y.re) (* y.re (log x.im)) (log x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))
63.0ms	x.im	@	inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (log x.re) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im)) (* (* x.re x.re) y.re) (* y.re (log x.im)) (log x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))
49.0ms	x.re	@	inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (log x.re) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im)) (* (* x.re x.re) y.re) (* y.re (log x.im)) (log x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))
48.0ms	x.re	@	-inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (log x.re) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im)) (* (* x.re x.re) y.re) (* y.re (log x.im)) (log x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))

rewrite499.0ms (5.6%)

Memory

28.5MiB live, 766.0MiB allocated; 118ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	3552	77928
0	3659	72137
0	13056	66719

Stop Event

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

Counts

684 → 769

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))) (sin.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
(exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))
(.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im))))
(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))
(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.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))
(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)
(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))) (sin (+ (* (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 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))
(.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))
(exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.re))
(log.f64 x.re)
(*.f64 y.im (atan2.f64 x.im x.re))
(sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 y.im (log.f64 x.re) (*.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) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im)))) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.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 #s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im)))) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 #s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im)))) (*.f64 (atan2.f64 x.im x.re) y.im))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im)))
#s(literal 1/2 binary64)
(/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im))
(.f64 (.f64 x.re x.re) y.re)
(*.f64 y.re (log.f64 x.im))
(log.f64 x.im)
(sin.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)
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (-.f64 (.f64 (.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)))))
(sin.f64 (/.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 (.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 (.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 (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)
(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 (.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))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (sin (* 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 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.im 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 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* y.re (log x.re))))
#s(approx (log x.re) #s(hole binary64 (log x.re)))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) #s(hole binary64 (* y.re (log x.im))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (/ (* (* x.re x.re) y.re) (* x.im x.im)) #s(hole binary64 (/ (* (pow x.re 2) y.re) (pow x.im 2))))
#s(approx (* (* x.re x.re) y.re) #s(hole binary64 (* (pow x.re 2) y.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))))))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))))) (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (/ (* (pow x.re 2) (* (pow y.im 2) (log x.im))) (pow x.im 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log x.im) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow y.im 2) (pow (log x.im) 2)) (/ (* (pow x.re 2) (* (pow y.im 2) (log x.im))) (pow x.im 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2)))))
#s(approx (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/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 (- (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (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)))) (* 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)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.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)))) (* y.re (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)))) (* 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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.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)))) (* y.re (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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (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)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* 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))))))
#s(approx (* (sin (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* 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))))) (* (sin (* 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)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.im 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 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #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)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (log x.re) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) #s(hole binary64 (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) #s(hole binary64 (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (/ (* y.re (log x.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))))))
#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))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.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)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* 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 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* 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)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 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 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 6) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (+ (/ (* (pow y.im 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)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ 1 x.re)) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (+ (/ (* (pow y.im 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)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (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)))) (* 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)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.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)))) (* y.re (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)))) (* 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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.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)))) (* y.re (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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (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)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* 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))))))
#s(approx (* (sin (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* 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))))) (* (sin (* 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)))))))
#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 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.re)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.re)))))))
#s(approx (log x.re) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (log (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))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.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)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* 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 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* 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)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 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 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 6) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (+ (/ (* (pow y.im 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)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.re)) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (+ (/ (* (pow y.im 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)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (sin (* 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 (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) #s(hole binary64 (/ (+ (* 1/2 (* (pow x.re 2) y.re)) (* (pow x.im 2) (* y.re (log x.im)))) (pow x.im 2))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (log x.im))))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))))))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))) (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (/ (* (pow x.im 2) (* (pow y.im 2) (log x.re))) (pow x.re 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log x.re) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow y.im 2) (pow (log x.re) 2)) (/ (* (pow x.im 2) (* (pow y.im 2) (log x.re))) (pow x.re 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/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 (- (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #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)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (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)))) (* 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)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.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)))) (* y.re (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)))) (* 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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.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)))) (* y.re (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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (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)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* 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))))))
#s(approx (* (sin (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* 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))))) (* (sin (* 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)))))))
#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 (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (* (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))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* 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 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.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)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* 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 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* 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)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 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 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 6) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ 1 x.im)) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (+ (/ (* (pow y.im 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)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ 1 x.im)) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (+ (/ (* (pow y.im 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)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #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)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (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)))) (* 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)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.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)))) (* y.re (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)))) (* 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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.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)))) (* y.re (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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (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)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* 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))))))
#s(approx (* (sin (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* 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))))) (* (sin (* 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)))))))
#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 (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (* (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))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* 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 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.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)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* 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 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* 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)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 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 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 6) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (+ (/ (* (pow y.im 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)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (+ (/ (* (pow y.im 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)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* 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)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* 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 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* 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)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (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) 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))))))))) (* (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)))) (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)))) (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 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* 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)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (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) 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))))))))) (+ (* y.re (+ (* -1/2 (* (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)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -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 (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 (* y.im (log (sqrt (+ (pow x.im 2) (pow 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) (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)))) (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)))) (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 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -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))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -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))) (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (pow (atan2 x.im x.re) 7))) (* 1/120 (pow (atan2 x.im x.re) 5)))))) (atan2 x.im x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.re))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (sin (* y.im (log x.re))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.re)))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 2) (sin (* y.im (log x.re)))))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (sin (* y.im (log x.re)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.re)))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 2) (sin (* y.im (log x.re)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 3) (sin (* y.im (log x.re)))))) (* 1/2 (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.re) (sin (* y.im (log x.re)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.re) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.re))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) #s(hole binary64 (* y.re (+ (log x.im) (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* 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 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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.re (+ (* -1/2 (* (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) 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))))))))) (* (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)))) (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)))) (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 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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.re (+ (* -1/2 (* (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) 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))))))))) (+ (* y.re (+ (* -1/2 (* (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)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -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 (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 (* y.im (log (sqrt (+ (pow x.im 2) (pow 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) (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)))) (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)))) (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 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (* 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)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (log x.re))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (log x.re) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (atan2 x.im x.re)))))
#s(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 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log x.re)) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.re)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log x.im)) (* -1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #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))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (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))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.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)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (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)))) (+ (* y.im (+ (* -1 (* (cos (* 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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/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))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.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)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (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)))) (+ (* y.im (+ (* -1 (* (cos (* 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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/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)))) (* y.im (+ (* -1/6 (* (cos (* 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 (* 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 (* 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 (* 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))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (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))) (* (log x.re) (pow x.re y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* 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))) (* (log x.re) (pow x.re y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re y.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.re y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))) (pow x.re y.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.re y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (* (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))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (* (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)))) (+ (* y.im (+ (* -1 (* (cos (* 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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/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))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (* (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)))) (+ (* y.im (+ (* -1 (* (cos (* 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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/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)))) (* y.im (+ (* -1/6 (* (cos (* 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 (* 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 (* 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 (* 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))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* 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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* 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 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.im (- (/ (* y.re (log x.re)) y.im) (atan2 x.im x.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (pow y.im 2))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log x.re)) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.re)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* 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))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
(/.f64 (exp.f64 (.f64 (log.f64 (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.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 (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 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.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))
(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)
(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))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))
(.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))
(/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (exp.f64 (.f64 y.im (atan2.f64 x.im x.re))))
(exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (cosh.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))
(/.f64 (-.f64 (pow.f64 (.f64 y.re (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 y.re (log.f64 x.re)) (.f64 y.re (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 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
(-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.re))
(log.f64 (pow.f64 x.re y.re))
(log.f64 x.re)
(*.f64 y.im (atan2.f64 x.im x.re))
(sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(+.f64 (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (cos.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))
(/.f64 (+.f64 (pow.f64 (.f64 y.im (log.f64 x.re)) #s(literal 3 binary64)) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (fma.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.im (log.f64 x.re)) (-.f64 (.f64 (.f64 y.re (atan2.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))
(fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))
(+.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))
(.f64 (exp.f64 (-.f64 #s(approx ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im)))) (.f64 (atan2.f64 x.im x.re) y.im))) (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))))
(/.f64 (exp.f64 #s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im))))) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (-.f64 #s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im)))) (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 #s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im)))) (.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 #s(approx ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im)))) (*.f64 (atan2.f64 x.im x.re) y.im))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im)))) #s(literal 3 binary64)) (pow.f64 (.f64 (atan2.f64 x.im x.re) y.im) #s(literal 3 binary64))) (fma.f64 #s(approx ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im)))) #s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im)))) (fma.f64 (.f64 (atan2.f64 x.im x.re) y.im) (.f64 (atan2.f64 x.im x.re) y.im) (.f64 #s(approx ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im)))) (*.f64 (atan2.f64 x.im x.re) y.im)))))
(-.f64 #s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im)))) (*.f64 (atan2.f64 x.im x.re) y.im))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))) #s(literal 3 binary64)) (pow.f64 (.f64 y.re (log.f64 x.im)) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.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 (.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.re (log.f64 x.im))) (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))) (.f64 y.re (log.f64 x.im))))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im)))
(+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))) (*.f64 y.re (log.f64 x.im)))
#s(literal 1/2 binary64)
(.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 y.re x.im))
(/.f64 (neg.f64 (.f64 (.f64 x.re x.re) y.re)) (neg.f64 (*.f64 x.im x.im)))
(/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im))
(.f64 (.f64 x.re x.re) y.re)
(*.f64 y.re (log.f64 x.im))
(log.f64 (pow.f64 x.im y.re))
(log.f64 x.im)
(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)))
(fma.f64 (sin.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 (cos.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))))
(+.f64 (.f64 (sin.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 (cos.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))))
(/.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))) (+.f64 (pow.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (.f64 (.f64 (log.f64 (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)
(.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))) (sin.f64 (/.f64 (-.f64 (pow.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im) #s(literal 2 binary64)) (pow.f64 (.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))) (-.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)))))
(sin.f64 (/.f64 (-.f64 (pow.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im) #s(literal 2 binary64)) (pow.f64 (.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))) (-.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 (neg.f64 (-.f64 (pow.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im) #s(literal 2 binary64)) (pow.f64 (.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)))) (neg.f64 (-.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 2 binary64)) (pow.f64 (.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))) (-.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 2 binary64)) (-.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 (pow.f64 (.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (-.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 (pow.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im) #s(literal 2 binary64)) (pow.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im) #s(literal 2 binary64)) (fma.f64 (pow.f64 (.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (pow.f64 (.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im) #s(literal 2 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))))))
(-.f64 (pow.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im) #s(literal 2 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)))
(.f64 (fabs.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im)) (fabs.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))) y.im)))
(.f64 (neg.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im)) (neg.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))) y.im)))
(.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))
(pow.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im) #s(literal 2 binary64))
(.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im)
(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 (.f64 (atan2.f64 x.im x.re) y.re)) (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))
(.f64 (neg.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))
(.f64 (.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))
(pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (.f64 (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))) (+.f64 (pow.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (.f64 (.f64 (log.f64 (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))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (.f64 x.im x.im)) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.re x.re) (.f64 (.f64 x.im x.im) x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 x.im x.im) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) 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 (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))
#s(approx (* (sin (* 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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (.f64 x.im x.im)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (.f64 (.f64 x.re x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.re x.re) (.f64 (.f64 x.im x.im) x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 x.im x.im) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) 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 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.re (log x.re)) (*.f64 y.re (log.f64 x.re)))
#s(approx (log x.re) (log.f64 x.re))
#s(approx (* y.im (atan2 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) (*.f64 y.re (log.f64 x.im)))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im))))
#s(approx (/ (* (* x.re x.re) y.re) (* x.im x.im)) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im)))
#s(approx (* (* x.re x.re) y.re) (.f64 (.f64 x.re x.re) y.re))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.im (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (* (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))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.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 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.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 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))))) (.f64 x.im x.im)) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.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 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))))) (.f64 x.im x.im)) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 y.im y.im) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -6 binary64))))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.re x.re) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.re x.re) (fma.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.re x.re) (fma.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (fma.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 y.im y.im) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -6 binary64))))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (.f64 x.re x.re) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (.f64 x.re x.re) (-.f64 (fma.f64 (.f64 x.re x.re) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (.f64 x.re x.re) (-.f64 (fma.f64 (.f64 x.re x.re) (-.f64 (fma.f64 (.f64 x.re x.re) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -6 binary64))))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.im (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im)) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 x.im))) (.f64 x.im x.im))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 x.im x.im))) (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -6 binary64))))) (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))))) (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 x.im x.im))) (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im)))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (.f64 (.f64 y.im y.im) (*.f64 (log.f64 x.im) (log.f64 x.im))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im)) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 x.im))) (*.f64 x.im x.im))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 x.im x.im))) (.f64 (.f64 y.im y.im) (*.f64 (log.f64 x.im) (log.f64 x.im)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -6 binary64))))) (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))))) (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.im)) (.f64 x.im x.im))) (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.im) (log.f64 x.im)))))
#s(approx (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.im (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 y.im (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 y.im (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.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)))) (.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))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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))) (.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))) (.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))) (.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)))) (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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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)))) (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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) x.re)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (.f64 (.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (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))) (+.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)))) (.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))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #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 (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))) (.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))) (.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))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #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 (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))) (.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))) (.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))) (.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))) (.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))) (.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 (* (sin (* y.re (atan2 x.im x.re))) (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))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* 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 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (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 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (.f64 (sin.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))))))
#s(approx (* (sin (* 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 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (.f64 (sin.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)))))))
#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))) x.re)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))))
#s(approx (+ (* x.im 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 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (.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))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.re (log x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (log x.re) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 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)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log 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/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)) (/.f64 (.f64 y.re (log.f64 x.im)) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 (exp.f64 (-.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 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (*.f64 x.re x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 (exp.f64 (-.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 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))))) (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 (exp.f64 (-.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 (exp.f64 (-.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 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (.f64 x.re 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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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/4 binary64) (.f64 (pow.f64 x.im #s(literal 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/2 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (-.f64 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 (exp.f64 (-.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 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))))) (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 (exp.f64 (-.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 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/2 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (-.f64 (.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 (exp.f64 (-.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 (exp.f64 (-.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 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 (exp.f64 (-.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 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (.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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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/4 binary64) (.f64 (pow.f64 x.im #s(literal 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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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/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 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (-.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 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (-.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/720 binary64) (/.f64 (.f64 y.im (.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)))) (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (-.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 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 (exp.f64 (-.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 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (-.f64 (.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 (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))) (*.f64 x.re x.re))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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/2 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))) (.f64 x.re x.re)) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (-.f64 (.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 (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (-.f64 (.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/2 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (-.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/720 binary64) (/.f64 (.f64 y.im (.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)))) (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (-.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 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (-.f64 (.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (.f64 (.f64 x.re 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 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 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/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (.f64 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)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (.f64 (.f64 x.re 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 (/.f64 (.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))) (-.f64 (.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 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 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/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.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/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (.f64 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)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (.f64 (.f64 x.re 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 (/.f64 (.f64 y.im y.im) (pow.f64 x.re #s(literal 6 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)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))) (-.f64 (.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 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 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/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (-.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/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.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)))) (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.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/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (.f64 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)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64))))))) (-.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 (pow.f64 x.re #s(literal 6 binary64)) (-.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 (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (.f64 x.re x.re)) (fma.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (.f64 x.re x.re)) (fma.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (+.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (.f64 (.f64 y.im y.im) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (.f64 x.re x.re)) (fma.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (.f64 x.re x.re)) (fma.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (+.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.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))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 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)))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #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))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #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)))))) (*.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)))) (.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))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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))) (.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))) (.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))) (.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)))) (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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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)))) (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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (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)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (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 (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 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.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 (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))) (.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))) (.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))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #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 (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))) (.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))) (.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))) (.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))) (.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))) (.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 (* (sin (* y.re (atan2 x.im x.re))) (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))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* 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 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (sin (* 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 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (.f64 (sin.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))))))
#s(approx (* (sin (* 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 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (.f64 (sin.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)))))))
#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 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (-.f64 (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.re (log x.re)) (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (log x.re) (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal -1 binary64) (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) (.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (*.f64 x.re x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))))) (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 (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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (.f64 x.re 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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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))))) (.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 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (-.f64 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))))) (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 (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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (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 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (-.f64 (.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 (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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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)))) (.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (.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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (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 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (-.f64 (.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 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 y.im y.im) (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)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (-.f64 (.f64 #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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (-.f64 (.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/720 binary64) (/.f64 (.f64 y.im (.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)))) (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (-.f64 (.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 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 (exp.f64 (-.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 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (-.f64 (.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 (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64)))))) (*.f64 x.re x.re))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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/2 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64)))))) (.f64 x.re x.re)) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (-.f64 (.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 (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (-.f64 (.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/2 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64)))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 y.im y.im) (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)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (-.f64 (.f64 #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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (-.f64 (.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/720 binary64) (/.f64 (.f64 y.im (.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)))) (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (-.f64 (.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 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (-.f64 (.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 (.f64 x.re x.re) (-.f64 (.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 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (.f64 x.re (-.f64 (.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(literal 2 binary64))) (/.f64 (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 (.f64 x.re x.re) (-.f64 (.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 (/.f64 (.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (-.f64 (.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 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (-.f64 (.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(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (.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/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (.f64 x.re (-.f64 (.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(literal 2 binary64))) (/.f64 (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 (.f64 x.re x.re) (-.f64 (.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 (/.f64 (.f64 y.im y.im) (pow.f64 x.re #s(literal 6 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)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (-.f64 (.f64 #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 (/.f64 (.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (-.f64 (.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 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (-.f64 (.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(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.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)))) (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (-.f64 (.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(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (.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/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (.f64 x.re (-.f64 (.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(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (-.f64 (.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 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 x.re x.re)) (fma.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 x.re x.re)) (fma.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (/.f64 (.f64 (.f64 y.im y.im) (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)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (.f64 (.f64 y.im y.im) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 x.re x.re)) (fma.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 x.re x.re)) (fma.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (/.f64 (.f64 (.f64 y.im y.im) (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)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (.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)) (-.f64 (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)))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #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))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #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)))))) (*.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)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (.f64 x.re x.re)) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)) (.f64 y.re (log.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)) (.f64 y.re (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.im x.im) (.f64 (.f64 x.re x.re) x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 x.re x.re) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#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))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))
#s(approx (* (sin (* 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 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (.f64 x.re x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (.f64 (.f64 x.im x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.re y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 x.re y.re))) (.f64 x.re x.re)) (pow.f64 x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.im x.im) (.f64 (.f64 x.re x.re) x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (.f64 x.re x.re) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) y.re) (.f64 (.f64 x.im x.im) (.f64 y.re (log.f64 x.im)))) (.f64 x.im x.im)))
#s(approx (* y.re (log x.im)) (*.f64 y.re (log.f64 x.im)))
#s(approx (log x.im) (log.f64 x.im))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.im (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))))) (.f64 x.re x.re)) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))))) (.f64 x.re x.re)) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 y.im y.im) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -6 binary64))))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.im x.im) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.im x.im) (fma.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.im x.im) (fma.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (fma.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 y.im y.im) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -6 binary64))))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (.f64 x.im x.im) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (.f64 x.im x.im) (-.f64 (fma.f64 (.f64 x.im x.im) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (.f64 x.im x.im) (-.f64 (fma.f64 (.f64 x.im x.im) (-.f64 (fma.f64 (.f64 x.im x.im) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -6 binary64))))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (pow.f64 (.f64 x.re (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re)) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 x.re))) (.f64 x.re x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 x.re x.re))) (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -6 binary64))))) (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))))) (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 x.re x.re))) (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re)))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (.f64 (.f64 y.im y.im) (*.f64 (log.f64 x.re) (log.f64 x.re))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re)) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (log.f64 x.re))) (*.f64 x.re x.re))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 x.re x.re))) (.f64 (.f64 y.im y.im) (*.f64 (log.f64 x.re) (log.f64 x.re)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (.f64 (.f64 y.im y.im) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -6 binary64))))) (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))))) (/.f64 (.f64 (.f64 y.im y.im) (log.f64 x.re)) (.f64 x.re x.re))) (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (.f64 y.im (log.f64 x.re)) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.im (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 y.im (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 y.im (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.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)))) (.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))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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))) (.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))) (.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))) (.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)))) (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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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)))) (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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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 (+ (* x.re x.re) (* x.im x.im)) (.f64 (.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (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))) (+.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)))) (.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))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (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/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))) (.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))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (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/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))) (.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))) (.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))) (.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))) (.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 (* (sin (* y.re (atan2 x.im x.re))) (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))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* 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 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (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 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (.f64 (sin.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))))))
#s(approx (* (sin (* 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 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (.f64 (sin.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 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (.f64 (sin.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)))))))
#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 (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) (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 (* y.re (log x.im)) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (log x.im) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (exp.f64 (-.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))))) (*.f64 x.im x.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (exp.f64 (-.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))))) (.f64 x.im x.im)) (/.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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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/4 binary64) (.f64 (pow.f64 x.re #s(literal 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/2 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (-.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/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))))) (-.f64 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (exp.f64 (-.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 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (-.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/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))))) (-.f64 (.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 (exp.f64 (-.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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)))) (.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))))) (.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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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/4 binary64) (.f64 (pow.f64 x.re #s(literal 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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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/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 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (-.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/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im)))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im)))) (.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 y.im y.im) (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)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (-.f64 (.f64 #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 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))))) (-.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/720 binary64) (/.f64 (.f64 y.im (.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)))) (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (-.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/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))))) (-.f64 (.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))))))))))) (pow.f64 x.im #s(literal 6 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/2 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (-.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/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))))) (-.f64 (.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 (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64)))))) (*.f64 x.im x.im))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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/2 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64)))))) (.f64 x.im x.im)) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (-.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/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))))) (-.f64 (.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 (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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 (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (-.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/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))))) (-.f64 (.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/2 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64)))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im)))) (.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 y.im y.im) (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)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (-.f64 (.f64 #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 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))))) (-.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/720 binary64) (/.f64 (.f64 y.im (.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)))) (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (-.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/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))))) (-.f64 (.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))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (-.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/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))))) (-.f64 (.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.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(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (.f64 (.f64 x.im x.im) (-.f64 (.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 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (-.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/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (.f64 x.im (-.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 2 binary64))) (/.f64 (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.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(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (.f64 (.f64 x.im x.im) (-.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 (/.f64 (.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im))))) (-.f64 (.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 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (-.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/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (-.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 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.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/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (.f64 x.im (-.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 2 binary64))) (/.f64 (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.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(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (.f64 (.f64 x.im x.im) (-.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 (/.f64 (.f64 y.im y.im) (pow.f64 x.im #s(literal 6 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)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im)))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im))))) (-.f64 (.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 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (-.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/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (-.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/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (-.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 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.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)))) (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (-.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 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.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/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (.f64 x.im (-.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 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (-.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/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.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 2 binary64))))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im)))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im)))) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.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(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (.f64 x.im x.im)) (fma.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im))) (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (.f64 x.im x.im)) (fma.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im))) (+.f64 (/.f64 (.f64 (.f64 y.im y.im) (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)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (.f64 (.f64 y.im y.im) (*.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (.f64 x.im x.im)) (fma.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im))) (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (neg.f64 (log.f64 x.im)))) (.f64 x.im x.im)) (fma.f64 (.f64 y.im y.im) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im))) (+.f64 (/.f64 (.f64 (.f64 y.im y.im) (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)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.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(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 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)))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #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))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #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)))))) (*.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)))) (.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))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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))) (.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))) (.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))) (.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)))) (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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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)))) (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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (.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))) (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)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (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 (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 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (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 (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))) (.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))) (.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))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (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 (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))) (.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))) (.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))) (.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))) (.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))) (.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 (* (sin (* y.re (atan2 x.im x.re))) (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))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* 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 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (sin (* 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 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (.f64 (sin.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))))))
#s(approx (* (sin (* 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 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (.f64 (sin.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 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (.f64 (sin.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)))))))
#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 (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (* y.re (log x.im)) (.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (log x.im) (+.f64 (log.f64 #s(literal -1 binary64)) (*.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)))) 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (*.f64 x.im x.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (.f64 x.im x.im)) (/.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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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))))) (.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 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (-.f64 (.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 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (-.f64 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (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 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (-.f64 (.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 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (-.f64 (.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 (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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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)))) (.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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)))) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (.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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (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 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (-.f64 (.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 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (-.f64 (.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 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 y.im y.im) (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)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (-.f64 (.f64 #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 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (-.f64 (.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/720 binary64) (/.f64 (.f64 y.im (.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)))) (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (-.f64 (.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 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (-.f64 (.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 #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))) (/.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/2 binary64) (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (-.f64 (.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 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (-.f64 (.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 (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64)))))) (*.f64 x.im x.im))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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/2 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64)))))) (.f64 x.im x.im)) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (-.f64 (.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 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (-.f64 (.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 (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))) (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (-.f64 (.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 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (-.f64 (.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/2 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64)))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 y.im y.im) (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)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (-.f64 (.f64 #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 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (-.f64 (.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/720 binary64) (/.f64 (.f64 y.im (.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)))) (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (-.f64 (.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 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (-.f64 (.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 #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))) (/.f64 (.f64 (cos.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (-.f64 (.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 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (-.f64 (.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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 (.f64 x.im x.im) (-.f64 (.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 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (.f64 x.im (-.f64 (.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(literal 2 binary64))) (/.f64 (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 (.f64 x.im x.im) (-.f64 (.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 (/.f64 (.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (-.f64 (.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 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (-.f64 (.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(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (.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/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (.f64 x.im (-.f64 (.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(literal 2 binary64))) (/.f64 (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 (.f64 x.im x.im) (-.f64 (.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 (/.f64 (.f64 y.im y.im) (pow.f64 x.im #s(literal 6 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)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (-.f64 (.f64 #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 (/.f64 (.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (-.f64 (.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 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (-.f64 (.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 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (-.f64 (.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(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.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)))) (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (-.f64 (.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(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (.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/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (.f64 x.im (-.f64 (.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(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (-.f64 (.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 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (.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 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (.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(literal 2 binary64))))))) (-.f64 (.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 (pow.f64 x.im #s(literal 6 binary64)) (-.f64 (.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 (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 x.im x.im)) (fma.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 x.im x.im)) (fma.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (/.f64 (.f64 (.f64 y.im y.im) (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)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (.f64 (.f64 y.im y.im) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 x.im x.im)) (fma.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (.f64 y.im y.im) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 x.im x.im)) (fma.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (/.f64 (.f64 (.f64 y.im y.im) (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)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 (.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (.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)) (-.f64 (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)))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #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))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #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)))))) (*.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)))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.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)))) (fma.f64 y.re (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 (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 (.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 (.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)))) (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 (.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 (.f64 y.im (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)))))) (.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 (.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 (.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 (.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)))) (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 (.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 (.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 (.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 (.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 (.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 (.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 (.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 (.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 (.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 (.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))) (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))) (sin.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))) (+.f64 (sin.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 (.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))) (+.f64 (sin.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 (.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 (.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))) (+.f64 (sin.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 (.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 (.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)))))) (atan2.f64 x.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 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 y.re (fma.f64 y.re (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (atan2.f64 x.im x.re)) (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (.f64 #s(literal 1/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)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (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)) (atan2.f64 x.im x.re)) (.f64 y.re (fma.f64 #s(literal -1/6 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 3 binary64))) (.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)) (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))) (atan2.f64 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (sin (* y.re (atan2 x.im x.re))) (.f64 y.re (fma.f64 #s(literal -1/6 binary64) (.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (.f64 y.re (fma.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (.f64 #s(literal 1/120 binary64) (.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))) (atan2.f64 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (.f64 y.re (fma.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))) (atan2.f64 x.im x.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.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 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.re)))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (sin.f64 (.f64 y.im (log.f64 x.re)))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (.f64 y.im (log.f64 x.re))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (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 (.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 (log.f64 x.re) (log.f64 x.re)) (sin.f64 (.f64 y.im (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)))) (.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (sin.f64 (.f64 y.im (log.f64 x.re))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (.f64 y.im (log.f64 x.re))))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (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 (.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 (log.f64 x.re) (log.f64 x.re)) (sin.f64 (.f64 y.im (log.f64 x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (.f64 y.im (log.f64 x.re))))) (.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 (.f64 (log.f64 x.re) (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)))) (.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (sin.f64 (.f64 y.im (log.f64 x.re))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (.f64 y.im (log.f64 x.re))))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re)))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.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 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.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 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.re))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (.f64 y.re (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 #s(literal -1/6 binary64) (.f64 y.re (.f64 (cos.f64 (.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))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.re)))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) (.f64 y.re (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (.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 (.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 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (.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 (.f64 y.im (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)))))) (.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 (.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 (.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 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (.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 (.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 (.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 (.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 (.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 (.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 (.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 (.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 (.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 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.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 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.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 (.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 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.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 (.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 (.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)))))) (atan2.f64 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (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 (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 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 (- (* (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 #s(literal -1 binary64) (.f64 y.re (atan2.f64 x.im x.re)) (.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)))) (.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 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))) (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 (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 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))) (sin.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 (atan2.f64 x.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 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.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)))
#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 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (*.f64 y.re (log.f64 x.re)))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (.f64 y.re (+.f64 (log.f64 x.re) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (.f64 y.re (+.f64 (/.f64 (.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (/.f64 (-.f64 (pow.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))) #s(literal 2 binary64)) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (/.f64 (-.f64 (pow.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))) #s(literal 2 binary64)) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (.f64 #s(literal -1 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (.f64 (.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 y.re y.re)) (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.im) (* (atan2 x.im x.re) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.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 (- (* y.re (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 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (log.f64 x.re)) y.re) (.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.re) (* x.im x.im))) (* y.re (log x.im))) (.f64 #s(literal -1 binary64) (.f64 y.re (+.f64 (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)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (- (* (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 (.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (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)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.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))) (.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 (.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)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.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))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.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 (.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 (.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 (.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 (.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)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.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))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.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 (.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 (.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 (.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 (.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 (.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 (.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))) (.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 (.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 (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (.f64 (cos.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))) (+.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (cos.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))) (+.f64 (sin.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 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/6 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 3 binary64)))))) (.f64 (cos.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 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.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))) (.f64 (log.f64 x.re) (pow.f64 x.re y.re)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.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))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (log.f64 x.re) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (log.f64 x.re) (log.f64 x.re)) (.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 (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)))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (log.f64 x.re) (pow.f64 x.re y.re))))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.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))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (log.f64 x.re) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (log.f64 x.re) (log.f64 x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (log.f64 x.re) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 x.re) (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))) (.f64 (log.f64 x.re) (pow.f64 x.re y.re))))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re y.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))) (pow.f64 x.re y.re)))
#s(approx (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re)))
#s(approx (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 x.re) (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.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 (.f64 (log.f64 x.re) (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (.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))) (.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 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (.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 (.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 (.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 (.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 (.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 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (.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 (.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 (.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 (.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 (.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 (.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 (.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 (.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))) (.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 (.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (.f64 (cos.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (cos.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (fma.f64 y.im (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 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/6 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 3 binary64)))))) (.f64 (cos.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (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 (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (.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.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 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (.f64 y.im (-.f64 (/.f64 (.f64 y.re (log.f64 x.re)) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (.f64 y.im (+.f64 (log.f64 x.re) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (.f64 y.im y.im)) (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.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 #s(literal -1 binary64) (/.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 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.re (log.f64 x.re)) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (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 (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (- (* (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 (.f64 y.re (atan2.f64 x.im x.re)) y.im)))))

eval634.0ms (7.1%)

Memory: 1.1MiB live, 294.8MiB allocated; 1.0s collecting garbage
Compiler: Compiled 48 693 to 5 831 computations (88% saved)

prune54.0ms (0.6%)

Memory

16.0MiB live, 108.9MiB allocated; 7ms collecting garbage

Pruning

33 alts after pruning (33 fresh and 0 done)

	Pruned	Kept	Total
New	950	28	978
Fresh	11	5	16
Picked	5	0	5
Done	0	0	0
Total	966	33	999

Accuracy

96.6%

Counts

999 → 33

Alt Table

Click to see full alt table

Status	Accuracy	Program
	21.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 #s(approx (- ( (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (pow.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))) #s(literal 2 binary64))) (-.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)))))
	16.0%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 #s(approx (- ( (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (.f64 (.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))) #s(literal 2 binary64)) (.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.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)))))
	34.4%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (/ (- ( (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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))))))
	34.6%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 #s(approx (+ (* x.re x.re) (* x.im x.im)) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 #s(approx (+ ( x.re x.re) (* x.im x.im)) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	33.8%	(.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))) (sin.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))))
	33.8%	(.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))) (sin.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))))
	5.1%	(.f64 (exp.f64 (-.f64 #s(approx ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im)))) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.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))) (+.f64 (pow.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))))
	31.2%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)) (sin.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))))
	33.7%	(.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))))) (sin.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
	20.8%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
	18.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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)))))))
	18.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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)))))))
	24.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))
	39.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))
▶	34.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)))) (.f64 (sin.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)))
	38.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)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re)))) y.re)))
	39.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)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))) y.re)))
	35.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)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re)) y.re)))
	32.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)))) (.f64 (sin.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)))
	35.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)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re) y.re)))
	30.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)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))
	14.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)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))))))
	12.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)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))
	28.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)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ ( y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.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 (.f64 (log.f64 x.re) (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))))))))
▶	36.0%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ ( y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)))))))
	29.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)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))
▶	23.8%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re)))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)))
▶	44.1%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (sin ( y.re (atan2 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)))
	28.8%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (exp (- ( y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
	16.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)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (.f64 #s(literal 1/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)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
	16.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)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 y.re (fma.f64 y.re (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (atan2.f64 x.im x.re)) (atan2.f64 x.im x.re)))))
▶	12.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)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
	19.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)))) #s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.re))))))

Compiler

Compiled 3 022 to 2 248 computations (25.6% saved)

series189.0ms (2.1%)

Memory

10.1MiB live, 295.0MiB allocated; 47ms collecting garbage

Counts

44 → 223

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

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

Calls

12 calls:

Time	Variable		Point	Expression
41.0ms	x.re	@	0	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) y.re (atan2 x.im x.re) x.im x.re (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.re x.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (* y.re y.re) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))) (+ (* -1/6 (* (* y.re y.re) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)) -1/6 (* (* y.re y.re) (pow (atan2 x.im x.re) 3)) (* y.re y.re) (pow (atan2 x.im x.re) 3) 3 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (log x.re) (* y.im (atan2 x.im x.re)) y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (cos (* y.re (atan2 x.im x.re))))
16.0ms	x.re	@	-inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) y.re (atan2 x.im x.re) x.im x.re (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.re x.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (* y.re y.re) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))) (+ (* -1/6 (* (* y.re y.re) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)) -1/6 (* (* y.re y.re) (pow (atan2 x.im x.re) 3)) (* y.re y.re) (pow (atan2 x.im x.re) 3) 3 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (log x.re) (* y.im (atan2 x.im x.re)) y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (cos (* y.re (atan2 x.im x.re))))
15.0ms	x.im	@	inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) y.re (atan2 x.im x.re) x.im x.re (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.re x.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (* y.re y.re) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))) (+ (* -1/6 (* (* y.re y.re) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)) -1/6 (* (* y.re y.re) (pow (atan2 x.im x.re) 3)) (* y.re y.re) (pow (atan2 x.im x.re) 3) 3 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (log x.re) (* y.im (atan2 x.im x.re)) y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (cos (* y.re (atan2 x.im x.re))))
14.0ms	x.re	@	inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) y.re (atan2 x.im x.re) x.im x.re (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.re x.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (* y.re y.re) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))) (+ (* -1/6 (* (* y.re y.re) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)) -1/6 (* (* y.re y.re) (pow (atan2 x.im x.re) 3)) (* y.re y.re) (pow (atan2 x.im x.re) 3) 3 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (log x.re) (* y.im (atan2 x.im x.re)) y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (cos (* y.re (atan2 x.im x.re))))
14.0ms	y.re	@	0	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) y.re (atan2 x.im x.re) x.im x.re (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.re x.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (* y.re y.re) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))) (+ (* -1/6 (* (* y.re y.re) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)) -1/6 (* (* y.re y.re) (pow (atan2 x.im x.re) 3)) (* y.re y.re) (pow (atan2 x.im x.re) 3) 3 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))) (* y.re (log x.re)) (log x.re) (* y.im (atan2 x.im x.re)) y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (cos (* y.re (atan2 x.im x.re))))

rewrite222.0ms (2.5%)

Memory

-4.6MiB live, 227.2MiB allocated; 92ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1583	16983
0	1641	16270
0	8212	14728

Stop Event

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

Counts

267 → 337

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

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

eval46.0ms (0.5%)

Memory: 33.5MiB live, 77.9MiB allocated; 4ms collecting garbage
Compiler: Compiled 12 300 to 2 581 computations (79% saved)

prune53.0ms (0.6%)

Memory

-15.9MiB live, 85.0MiB allocated; 11ms collecting garbage

Pruning

39 alts after pruning (36 fresh and 3 done)

	Pruned	Kept	Total
New	373	18	391
Fresh	10	18	28
Picked	2	3	5
Done	0	0	0
Total	385	39	424

Accuracy

96.6%

Counts

424 → 39

Alt Table

Click to see full alt table

Status	Accuracy	Program
	21.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 #s(approx (- ( (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (pow.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))) #s(literal 2 binary64))) (-.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)))))
	16.0%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 #s(approx (- ( (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (.f64 (.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))) #s(literal 2 binary64)) (.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.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)))))
	34.4%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (/ (- ( (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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))))))
	34.6%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 #s(approx (+ (* x.re x.re) (* x.im x.im)) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 #s(approx (+ ( x.re x.re) (* x.im x.im)) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
▶	33.8%	(.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))) (sin.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))))
	33.8%	(.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))) (sin.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))))
	5.1%	(.f64 (exp.f64 (-.f64 #s(approx ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im)))) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.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))) (+.f64 (pow.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))))
	31.2%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)) (sin.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))))
	33.7%	(.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))))) (sin.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
	20.8%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
	18.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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)))))))
	18.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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)))))))
	24.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))
✓	34.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)))) (.f64 (sin.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)))
	30.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)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))
	12.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)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))
	28.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)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ ( y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.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 (.f64 (log.f64 x.re) (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 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)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ ( y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))))
	30.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)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ ( y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (*.f64 y.im (log.f64 x.re))))))
	29.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)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))
	15.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re)))) (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.im) y.re)))
	16.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re)))) #s(approx (pow (sqrt (+ ( x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))
✓	44.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)))) (.f64 #s(approx (sin ( y.re (atan2 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)))
	38.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.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)))
	37.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (-.f64 x.re (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) x.re)))) y.re)))
▶	39.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (-.f64 x.im (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))) y.re)))
	32.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (.f64 x.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.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (.f64 x.im (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))) y.re)))
	34.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (neg.f64 x.re)) y.re)))
	34.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.re) y.re)))
▶	29.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.im) y.re)))
▶	15.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ ( x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))))
	21.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ ( x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 x.re y.re))) (.f64 x.re x.re)) (pow.f64 x.re y.re)))))
	16.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ ( x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))))))
	19.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) #s(approx (* y.re (+ (* -1/6 (* (* y.re y.re) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))) (.f64 (.f64 (.f64 y.re y.re) y.re) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (/.f64 (atan2.f64 x.im x.re) (.f64 y.re y.re)))))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
	27.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) #s(approx (* y.re (+ (* -1/6 (* (* y.re y.re) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))) (.f64 #s(literal -1/6 binary64) (pow.f64 (.f64 y.re (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)))
	16.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)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (.f64 #s(literal 1/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)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
✓	12.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)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
	19.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)))) #s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.re))))))

Compiler

Compiled 3 588 to 2 686 computations (25.1% saved)

series169.0ms (1.9%)

Memory

11.3MiB live, 291.4MiB allocated; 16ms collecting garbage

Counts

52 → 420

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

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

Calls

12 calls:

Time	Variable		Point	Expression
16.0ms	x.im	@	inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) y.re (atan2 x.im x.re) x.im x.re (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (- x.im (* -1/2 (/ (* x.re x.re) x.im))) (* -1/2 (/ (* x.re x.re) x.im)) -1/2 (/ (* x.re x.re) x.im) (* x.re x.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))) (/ (* x.re x.re) (* x.im x.im)) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) (* (* x.re x.re) (* y.re (pow x.im y.re))) (* y.re (pow x.im y.re)) (pow x.im y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* -1 x.re) -1 (* (atan2 x.im x.re) y.im) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
15.0ms	x.re	@	-inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) y.re (atan2 x.im x.re) x.im x.re (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (- x.im (* -1/2 (/ (* x.re x.re) x.im))) (* -1/2 (/ (* x.re x.re) x.im)) -1/2 (/ (* x.re x.re) x.im) (* x.re x.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))) (/ (* x.re x.re) (* x.im x.im)) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) (* (* x.re x.re) (* y.re (pow x.im y.re))) (* y.re (pow x.im y.re)) (pow x.im y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* -1 x.re) -1 (* (atan2 x.im x.re) y.im) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
15.0ms	y.re	@	0	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) y.re (atan2 x.im x.re) x.im x.re (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (- x.im (* -1/2 (/ (* x.re x.re) x.im))) (* -1/2 (/ (* x.re x.re) x.im)) -1/2 (/ (* x.re x.re) x.im) (* x.re x.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))) (/ (* x.re x.re) (* x.im x.im)) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) (* (* x.re x.re) (* y.re (pow x.im y.re))) (* y.re (pow x.im y.re)) (pow x.im y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* -1 x.re) -1 (* (atan2 x.im x.re) y.im) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
14.0ms	x.re	@	inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) y.re (atan2 x.im x.re) x.im x.re (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (- x.im (* -1/2 (/ (* x.re x.re) x.im))) (* -1/2 (/ (* x.re x.re) x.im)) -1/2 (/ (* x.re x.re) x.im) (* x.re x.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))) (/ (* x.re x.re) (* x.im x.im)) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) (* (* x.re x.re) (* y.re (pow x.im y.re))) (* y.re (pow x.im y.re)) (pow x.im y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* -1 x.re) -1 (* (atan2 x.im x.re) y.im) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
14.0ms	x.re	@	0	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) y.re (atan2 x.im x.re) x.im x.re (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (- x.im (* -1/2 (/ (* x.re x.re) x.im))) (* -1/2 (/ (* x.re x.re) x.im)) -1/2 (/ (* x.re x.re) x.im) (* x.re x.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (* x.im (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))))) (- 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im)))) 1 (* -1/2 (/ (* x.re x.re) (* x.im x.im))) (/ (* x.re x.re) (* x.im x.im)) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im)) (* (* x.re x.re) (* y.re (pow x.im y.re))) (* y.re (pow x.im y.re)) (pow x.im y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* -1 x.re) -1 (* (atan2 x.im x.re) y.im) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))

rewrite288.0ms (3.2%)

Memory

-1.1MiB live, 276.7MiB allocated; 41ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2156	27076
0	2207	26801
0	9329	23132

Stop Event

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

Counts

472 → 505

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

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

eval72.0ms (0.8%)

Memory: -17.2MiB live, 70.1MiB allocated; 11ms collecting garbage
Compiler: Compiled 16 168 to 3 590 computations (77.8% saved)

prune98.0ms (1.1%)

Memory

19.1MiB live, 118.2MiB allocated; 19ms collecting garbage

Pruning

43 alts after pruning (39 fresh and 4 done)

	Pruned	Kept	Total
New	480	9	489
Fresh	1	30	31
Picked	4	1	5
Done	0	3	3
Total	485	43	528

Accuracy

96.6%

Counts

528 → 43

Alt Table

Click to see full alt table

Status	Accuracy	Program
	21.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 #s(approx (- ( (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (pow.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))) #s(literal 2 binary64))) (-.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)))))
	16.0%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 #s(approx (- ( (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (.f64 (.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))) #s(literal 2 binary64)) (.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.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)))))
	34.6%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 #s(approx (+ (* x.re x.re) (* x.im x.im)) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 #s(approx (+ ( x.re x.re) (* x.im x.im)) (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	11.1%	(.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))) (sin.f64 (/.f64 (+.f64 (pow.f64 (.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.re))) y.im) #s(literal 3 binary64)) (pow.f64 (.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.re))) y.im) (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.re))) 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 #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)))))))
	16.4%	(.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))) (sin.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 (+.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))))))
	33.8%	(.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))) (sin.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))))
	5.1%	(.f64 (exp.f64 (-.f64 #s(approx ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im)))) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.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))) (+.f64 (pow.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))))
	31.2%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)) (sin.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	24.6%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)) (sin.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))))
	22.9%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re))))) (sin.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))))
	33.7%	(.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))))) (sin.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
	20.8%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 x.re) (log.f64 x.re))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
	18.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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)))))))
	18.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (/.f64 (-.f64 (.f64 (.f64 y.im y.im) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (.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)))))))
	24.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) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (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 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))
✓	34.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)))) (.f64 (sin.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)))
	30.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)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im) y.re)))
	12.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)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))
	28.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)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ ( y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.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 (.f64 (log.f64 x.re) (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 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)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ ( y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))))
	30.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)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ ( y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (*.f64 y.im (log.f64 x.re))))))
	29.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)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))
	15.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re)))) (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.im) y.re)))
	16.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re)))) #s(approx (pow (sqrt (+ ( x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))
✓	44.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)))) (.f64 #s(approx (sin ( y.re (atan2 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)))
	38.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.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)))
	37.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (-.f64 x.re (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) x.re)))) y.re)))
	32.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (.f64 x.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)))
	27.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (.f64 x.im #s(approx (- 1 ( -1/2 (/ (* x.re x.re) (* x.im x.im)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))) y.re)))
	34.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) (neg.f64 x.re)) y.re)))
	32.8%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) #s(approx (- x.im (* -1/2 (/ (* x.re x.re) x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im)))) y.re)))
	34.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.re) y.re)))
✓	29.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ ( x.im x.im) (* x.re x.re))) x.im) y.re)))
	11.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ ( x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re #s(approx (pow x.im y.re) #s(literal 1 binary64)))) (.f64 x.im x.im)) #s(approx (pow x.im y.re) #s(literal 1 binary64))))))
	21.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ ( x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 x.re y.re))) (.f64 x.re x.re)) (pow.f64 x.re y.re)))))
	16.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ ( x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))))))
	15.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ ( x.im x.im) (* x.re x.re))) y.re) #s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (pow.f64 x.im y.re)) (.f64 x.im x.im)) (/.f64 (pow.f64 x.im y.re) y.re)))))))
	17.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ ( x.im x.im) (* x.re x.re))) y.re) #s(approx (+ (* 1/2 (/ (* (* x.re x.re) (* y.re (pow x.im y.re))) (* x.im x.im))) (pow x.im y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (*.f64 x.im x.im)))))))
	19.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) #s(approx (* y.re (+ (* -1/6 (* (* y.re y.re) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))) (.f64 (.f64 (.f64 y.re y.re) y.re) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (/.f64 (atan2.f64 x.im x.re) (.f64 y.re y.re)))))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
	27.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)))) (.f64 #s(approx (sin ( y.re (atan2 x.im x.re))) #s(approx (* y.re (+ (* -1/6 (* (* y.re y.re) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))) (.f64 #s(literal -1/6 binary64) (pow.f64 (.f64 y.re (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)))
	16.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)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (.f64 #s(literal 1/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)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
✓	12.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)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
	19.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)))) #s(approx (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.re))))))

Compiler

Compiled 3 962 to 2 128 computations (46.3% saved)

regimes137.0ms (1.5%)

Memory

29.5MiB live, 118.7MiB allocated; 15ms collecting garbage

Counts

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

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

Outputs

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

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

Calls

5 calls:

44.0ms	x.re
32.0ms	y.re
19.0ms	x.im
19.0ms	y.im
15.0ms	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))

Results

Accuracy	Segments	Branch
63.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))) (sin.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.1%	3	`x.re`
72.7%	5	`x.im`
64.1%	4	`y.re`
60.0%	4	`y.im`

Compiler

Compiled 29 to 35 computations (-20.7% saved)

regimes36.0ms (0.4%)

Memory

-27.8MiB live, 27.1MiB allocated; 13ms collecting garbage

Counts

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

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

Outputs

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

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

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

Calls

1 calls:

31.0ms

x.re

Results

Accuracy	Segments	Branch
73.7%	3	`x.re`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes41.0ms (0.5%)

Memory

-7.9MiB live, 37.1MiB allocated; 7ms collecting garbage

Counts

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

Outputs

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

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

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

Calls

2 calls:

24.0ms	x.im
13.0ms	x.re

Results

Accuracy	Segments	Branch
68.7%	3	`x.im`
68.7%	3	`x.re`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes29.0ms (0.3%)

Memory

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

Counts

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

Outputs

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

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

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

Calls

2 calls:

13.0ms	x.im
13.0ms	x.re

Results

Accuracy	Segments	Branch
63.8%	4	`x.im`
67.2%	3	`x.re`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes66.0ms (0.7%)

Memory

-28.1MiB live, 62.4MiB allocated; 13ms collecting garbage

Counts

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

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

Calls

4 calls:

22.0ms	x.im
18.0ms	x.re
12.0ms	y.re
10.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))) (sin.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))

Results

Accuracy	Segments	Branch
56.2%	5	`x.im`
62.4%	5	`y.re`
61.2%	3	`(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.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))))`
63.7%	4	`x.re`

Compiler

Compiled 28 to 31 computations (-10.7% saved)

regimes15.0ms (0.2%)

Memory

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

Counts

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

Outputs

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

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

Calls

1 calls:

12.0ms

x.re

Results

Accuracy	Segments	Branch
62.0%	3	`x.re`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes32.0ms (0.4%)

Memory

-24.3MiB live, 30.8MiB allocated; 9ms collecting garbage

Counts

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

Outputs

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

Calls

2 calls:

17.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))) (sin.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))))

11.0ms

x.re

Results

Accuracy	Segments	Branch
47.7%	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))) (sin.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))))`
58.6%	2	`x.re`

Compiler

Compiled 26 to 23 computations (11.5% saved)

regimes14.0ms (0.2%)

Memory

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

Counts

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

Outputs

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

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

Calls

1 calls:

11.0ms

x.re

Results

Accuracy	Segments	Branch
58.2%	2	`x.re`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes28.0ms (0.3%)

Memory

-17.2MiB live, 28.2MiB allocated; 6ms collecting garbage

Counts

24 → 2

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

13.0ms	y.re
7.0ms	y.im
7.0ms	x.re

Results

Accuracy	Segments	Branch
47.1%	2	`y.im`
54.0%	3	`y.re`
55.3%	2	`x.re`

Compiler

Compiled 3 to 12 computations (-300% saved)

regimes19.0ms (0.2%)

Memory

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

Counts

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

Outputs

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

Calls

5 calls:

4.0ms	x.im
4.0ms	y.im
4.0ms	x.re
4.0ms	y.re
3.0ms	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.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
44.1%	1	`(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.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))))`
44.1%	1	`y.im`
44.1%	1	`x.im`
44.1%	1	`y.re`
44.1%	1	`x.re`

Compiler

Compiled 29 to 35 computations (-20.7% saved)

regimes24.0ms (0.3%)

Memory

-23.9MiB live, 21.8MiB allocated; 5ms collecting garbage

Counts

8 → 3

Calls

Call 1

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

Outputs

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

Calls

5 calls:

12.0ms	y.im
3.0ms	x.im
3.0ms	x.re
3.0ms	y.re
2.0ms	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.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
38.6%	1	`y.re`
41.3%	2	`x.im`
38.6%	1	`y.im`
40.2%	2	`(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))`
44.2%	3	`x.re`

Compiler

Compiled 29 to 35 computations (-20.7% saved)

regimes8.0ms (0.1%)

Memory

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

Counts

3 → 3

Calls

Call 1

Inputs

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

Calls

5 calls:

2.0ms	y.im
2.0ms	x.im
2.0ms	x.re
2.0ms	y.re
1.0ms	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.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
39.1%	3	`y.re`
34.3%	1	`y.im`
34.3%	1	`(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))`
39.4%	3	`x.im`
40.9%	3	`x.re`

Compiler

Compiled 29 to 35 computations (-20.7% saved)

regimes7.0ms (0.1%)

Memory

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

Counts

2 → 3

Calls

Call 1

Inputs

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

Outputs

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

Calls

5 calls:

1.0ms	x.re
1.0ms	x.im
1.0ms	y.im
1.0ms	y.re
1.0ms	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.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
29.6%	1	`(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))`
29.6%	1	`y.im`
35.3%	3	`y.re`
29.6%	1	`x.im`
29.6%	1	`x.re`

Compiler

Compiled 29 to 35 computations (-20.7% saved)

regimes9.0ms (0.1%)

Memory

-32.4MiB live, 14.1MiB allocated; 5ms collecting garbage

Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

Counts

1 → 1

Calls

Call 1

Inputs

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

Outputs

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

Calls

5 calls:

5.0ms	y.re
1.0ms	x.im
1.0ms	x.re
1.0ms	y.im
1.0ms	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.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
12.1%	1	`y.im`
12.1%	1	`(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.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))))`
12.1%	1	`x.re`
12.1%	1	`x.im`
12.1%	1	`y.re`

Compiler

Compiled 29 to 35 computations (-20.7% saved)

bsearch89.0ms (1%)

Memory

-9.6MiB live, 94.9MiB allocated; 25ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
66.0ms	1.1567980467549872e-273	6.8918323953239e-268
19.0ms	-4.390106485773534e-97	-2.0685088129115176e-97

Samples

39.0ms	144×	0	valid
25.0ms	80×	1	valid

Compiler

Compiled 1 078 to 921 computations (14.6% saved)

Precisions

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

ival-hypot: 30.0ms (52.9% of total)

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

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

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

adjust: 3.0ms (5.3% of total)

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

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

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

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

bsearch46.0ms (0.5%)

Memory

25.8MiB live, 71.1MiB allocated; 6ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
42.0ms	4.567301105462936e-173	2.9185415792067907e-161
1.0ms	-4.390106485773534e-97	-2.0685088129115176e-97

Samples

24.0ms	67×	1	valid
10.0ms	92×	0	valid
1.0ms	1×	2	valid

Compiler

Compiled 990 to 868 computations (12.3% saved)

Precisions

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

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

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

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

ival-sin: 4.0ms (13.6% of total)

adjust: 3.0ms (10.2% of total)

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

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

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

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

bsearch38.0ms (0.4%)

Memory

-6.3MiB live, 90.2MiB allocated; 14ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	4.567301105462936e-173	2.9185415792067907e-161
34.0ms	-2.712369478746796e+191	-1.269214285177475e+187

Samples

13.0ms	90×	0	valid
11.0ms	38×	1	valid

Compiler

Compiled 1 188 to 1 069 computations (10% saved)

Precisions

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

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

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

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

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

ival-sin: 2.0ms (9.8% of total)

adjust: 1.0ms (4.9% of total)

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

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

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

bsearch85.0ms (1%)

Memory

0.2MiB live, 94.8MiB allocated; 3ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
81.0ms	1.8198930266772283e-5	0.32844347698605775
1.0ms	-2.712369478746796e+191	-1.269214285177475e+187

Samples

62.0ms	88×	0	valid
13.0ms	40×	1	valid

Compiler

Compiled 1 192 to 1 039 computations (12.8% saved)

Precisions

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

ival-hypot: 56.0ms (78.6% of total)

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

adjust: 3.0ms (4.2% of total)

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

ival-sin: 3.0ms (4.2% of total)

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

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

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

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

bsearch132.0ms (1.5%)

Memory

25.8MiB live, 205.2MiB allocated; 26ms collecting garbage

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
18.0ms	5.029226786492367e-277	9.046131921848053e-277
43.0ms	-7.275395831300226e+19	-6067.458533082559
64.0ms	-1.2274765200450534e+169	-1.5622220111426287e+152

Samples

65.0ms	262×	0	valid
41.0ms	120×	1	valid
1.0ms	2×	2	valid

Compiler

Compiled 1 728 to 1 535 computations (11.2% saved)

Precisions

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

ival-mult!: 19.0ms (31.1% of total)

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

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

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

adjust: 5.0ms (8.2% of total)

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

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

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

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

bsearch36.0ms (0.4%)

Memory

-42.8MiB live, 57.0MiB allocated; 25ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	5.029226786492367e-277	9.046131921848053e-277
25.0ms	-6067.458533082559	-484.9162131699933

Samples

13.0ms	29×	1	valid
7.0ms	67×	0	valid

Compiler

Compiled 828 to 675 computations (18.5% saved)

Precisions

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

ival-sin: 6.0ms (34.9% of total)

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

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

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

adjust: 1.0ms (5.8% of total)

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

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

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

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

bsearch44.0ms (0.5%)

Memory

6.0MiB live, 95.9MiB allocated; 20ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
37.0ms	-8.913552621268393e-306	1.770325939462033e-306

Samples

18.0ms	48×	1	valid
10.0ms	93×	0	valid
2.0ms	3×	2	valid

Compiler

Compiled 832 to 671 computations (19.4% saved)

Precisions

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

ival-sin: 7.0ms (27.4% of total)

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

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

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

adjust: 2.0ms (7.8% of total)

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

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

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

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

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	5.029226786492367e-277	9.046131921848053e-277

Compiler

Compiled 408 to 315 computations (22.8% saved)

bsearch52.0ms (0.6%)

Memory

31.0MiB live, 77.3MiB allocated; 4ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
49.0ms	5.839265761744322e-31	1.211909543929235e-23

Samples

30.0ms	100×	0	valid
13.0ms	44×	1	valid

Compiler

Compiled 850 to 671 computations (21.1% saved)

Precisions

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

ival-hypot: 23.0ms (59.5% of total)

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

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

ival-sin: 3.0ms (7.8% of total)

adjust: 2.0ms (5.2% of total)

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

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

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

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

bsearch113.0ms (1.3%)

Memory

-34.7MiB live, 110.5MiB allocated; 37ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
49.0ms	4.567301105462936e-173	2.9185415792067907e-161
56.0ms	-1.6648287506366576e-99	-9.918809269939643e-101

Samples

39.0ms	146×	0	valid
24.0ms	77×	1	valid
1.0ms	1×	2	valid

Compiler

Compiled 1 373 to 1 084 computations (21% saved)

Precisions

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

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

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

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

ival-sin: 5.0ms (15.1% of total)

adjust: 3.0ms (9% of total)

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

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

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

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

bsearch32.0ms (0.4%)

Memory

22.3MiB live, 66.1MiB allocated; 6ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	4.567301105462936e-173	2.9185415792067907e-161
28.0ms	-5.161058554560682e+21	-7.275395831300226e+19

Samples

13.0ms	42×	1	valid
8.0ms	70×	0	valid

Compiler

Compiled 1 366 to 1 077 computations (21.2% saved)

Precisions

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

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

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

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

adjust: 2.0ms (12% of total)

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

ival-sin: 2.0ms (12% of total)

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

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

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

bsearch116.0ms (1.3%)

Memory

28.6MiB live, 123.6MiB allocated; 20ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
69.0ms	408894119357.9296	63028558607459.01
42.0ms	-7.135342042835225e+22	-1079431382302038.1

Samples

62.0ms	57×	1	valid
38.0ms	199×	0	valid

Compiler

Compiled 1 272 to 999 computations (21.5% saved)

Precisions

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

ival-log: 50.0ms (63.6% of total)

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

ival-sin: 7.0ms (8.9% of total)

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

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

adjust: 2.0ms (2.5% of total)

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

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

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

derivations392.0ms (4.4%)

Memory

-20.4MiB live, 451.0MiB allocated; 57ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 337 to 166 computations (50.7% saved)

preprocess231.0ms (2.6%)

Memory: -56.3MiB live, 371.7MiB allocated; 135ms collecting garbage
Compiler: Compiled 362 to 185 computations (48.9% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze918.0ms (10.3%)

sample2.7s (30.2%)

preprocess76.0ms (0.9%)

series182.0ms (2%)

rewrite207.0ms (2.3%)

eval45.0ms (0.5%)

prune31.0ms (0.3%)

series557.0ms (6.3%)

rewrite499.0ms (5.6%)

eval634.0ms (7.1%)

prune54.0ms (0.6%)

series189.0ms (2.1%)

rewrite222.0ms (2.5%)

eval46.0ms (0.5%)

prune53.0ms (0.6%)

series169.0ms (1.9%)

rewrite288.0ms (3.2%)

eval72.0ms (0.8%)

prune98.0ms (1.1%)

regimes137.0ms (1.5%)

regimes36.0ms (0.4%)

regimes41.0ms (0.5%)

regimes29.0ms (0.3%)

regimes66.0ms (0.7%)

regimes15.0ms (0.2%)

regimes32.0ms (0.4%)

regimes14.0ms (0.2%)

regimes28.0ms (0.3%)

regimes19.0ms (0.2%)

regimes24.0ms (0.3%)

regimes8.0ms (0.1%)

regimes7.0ms (0.1%)

regimes9.0ms (0.1%)

bsearch89.0ms (1%)

bsearch46.0ms (0.5%)

bsearch38.0ms (0.4%)

bsearch85.0ms (1%)

bsearch132.0ms (1.5%)

bsearch36.0ms (0.4%)

bsearch44.0ms (0.5%)

bsearch1.0ms (0%)

bsearch52.0ms (0.6%)

bsearch113.0ms (1.3%)

bsearch32.0ms (0.4%)

bsearch116.0ms (1.3%)

derivations392.0ms (4.4%)

preprocess231.0ms (2.6%)

end0.0ms (0%)

Profiling