powComplex, imaginary part

Time bar (total: 9.0s)

start0.0ms (0%)

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

analyze424.0ms (4.7%)

Memory
4.3MiB live, 469.0MiB allocated; 133ms collecting garbage
Algorithm
1×search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
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 (29.4%)

Memory
78.6MiB live, 3 144.6MiB allocated; 685ms collecting garbage
Samples
1.2s2 870×1valid
880.0ms5 314×0valid
114.0ms72×2valid
Precisions
Click to see histograms. Total time spent on operations: 1.8s
ival-mult!: 404.0ms (22.8% of total)
ival-hypot: 355.0ms (20% of total)
ival-sin: 268.0ms (15.1% of total)
ival-log: 226.0ms (12.8% of total)
ival-atan2: 164.0ms (9.3% of total)
adjust: 151.0ms (8.5% of total)
ival-exp: 137.0ms (7.7% of total)
ival-sub!: 36.0ms (2% of total)
ival-add!: 31.0ms (1.8% of total)
Bogosity

preprocess98.0ms (1.1%)

Memory
-46.3MiB live, 58.1MiB allocated; 15ms collecting garbage
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
0141575
1485556
21777552
37801552
Stop Event
1×node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶44.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))) (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)

series203.0ms (2.2%)

Memory
35.8MiB live, 510.1MiB allocated; 62ms collecting garbage
Counts
19 → 267
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (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 (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 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)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4))))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.im 2)) 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 2))) (* y.re (log (sqrt (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 2))) (* y.re (log (sqrt (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log (sqrt (pow x.im 2)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* 1/2 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ 1 (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 6))) (* 1/4 (/ 1 (pow (sqrt (pow x.im 2)) 4))))) (* 1/2 (/ 1 (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (sqrt (pow x.im 2))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* 1/2 (/ (pow x.re 2) (sqrt (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 3))) (* 1/2 (/ 1 (sqrt (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 5))) (* 1/8 (/ 1 (pow (sqrt (pow x.im 2)) 3))))) (* 1/2 (/ 1 (sqrt (pow x.im 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (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)))) (* 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 (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.im 2)) 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 2))) (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 6)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 2))) (* y.im (log (sqrt (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 6))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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 (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (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 (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 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.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4))))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.re 2)) 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 2))) (* y.re (log (sqrt (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 2))) (* y.re (log (sqrt (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log (sqrt (pow x.re 2)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* 1/2 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ 1 (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 6))) (* 1/4 (/ 1 (pow (sqrt (pow x.re 2)) 4))))) (* 1/2 (/ 1 (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (sqrt (pow x.re 2))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* 1/2 (/ (pow x.im 2) (sqrt (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 3))) (* 1/2 (/ 1 (sqrt (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 5))) (* 1/8 (/ 1 (pow (sqrt (pow x.re 2)) 3))))) (* 1/2 (/ 1 (sqrt (pow x.re 2)))))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (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.re 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.re 2)) 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 2))) (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 6)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 2))) (* y.im (log (sqrt (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 6))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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)))) (* -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 (+ (/ (* 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.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:

TimeVariablePointExpression
58.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))
18.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)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.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)))) (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))
14.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))
13.0ms
y.im
@0
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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))

rewrite292.0ms (3.2%)

Memory
21.7MiB live, 480.4MiB allocated; 69ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0159720957
0162720309
0835017457
Stop Event
1×iter-limit
1×node-limit
1×iter-limit
Counts
286 → 332
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 (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 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)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4))))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.im 2)) 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 2))) (* y.re (log (sqrt (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 2))) (* y.re (log (sqrt (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log (sqrt (pow x.im 2)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* 1/2 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ 1 (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 6))) (* 1/4 (/ 1 (pow (sqrt (pow x.im 2)) 4))))) (* 1/2 (/ 1 (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (sqrt (pow x.im 2))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* 1/2 (/ (pow x.re 2) (sqrt (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 3))) (* 1/2 (/ 1 (sqrt (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 5))) (* 1/8 (/ 1 (pow (sqrt (pow x.im 2)) 3))))) (* 1/2 (/ 1 (sqrt (pow x.im 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (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)))) (* 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 (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.im 2)) 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 2))) (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 6)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 2))) (* y.im (log (sqrt (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 6))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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 (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (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 (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 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.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4))))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.re 2)) 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 2))) (* y.re (log (sqrt (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 2))) (* y.re (log (sqrt (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log (sqrt (pow x.re 2)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* 1/2 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ 1 (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 6))) (* 1/4 (/ 1 (pow (sqrt (pow x.re 2)) 4))))) (* 1/2 (/ 1 (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (sqrt (pow x.re 2))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* 1/2 (/ (pow x.im 2) (sqrt (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 3))) (* 1/2 (/ 1 (sqrt (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 5))) (* 1/8 (/ 1 (pow (sqrt (pow x.re 2)) 3))))) (* 1/2 (/ 1 (sqrt (pow x.re 2)))))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (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.re 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.re 2)) 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 2))) (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 6)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 2))) (* y.im (log (sqrt (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 6))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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)))) (* -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 (+ (/ (* 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.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 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.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 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (sqrt.f64 (*.f64 x.im x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (sqrt.f64 (*.f64 x.im x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (-.f64 (sqrt.f64 (*.f64 x.im x.im)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3/2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 (*.f64 x.im x.im) #s(literal 5/2 binary64))) (*.f64 #s(literal -1/8 binary64) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 x.im x.im))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.im x.im))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (fma.f64 x.im x.im (*.f64 x.re x.re)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx x.re x.re)
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (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 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.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 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.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 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))))))
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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)))))))) (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 (*.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))))))))))) (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 (*.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 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.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 (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 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 y.re y.re))))) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 y.re y.re))))) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) y.re) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) y.re) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) y.re) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) y.re) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (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 (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 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) y.im) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) y.im) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) y.im) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) y.im) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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)))))))) (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 (*.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))))))))))) (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 (*.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 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.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 (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 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 y.re y.re))))) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 y.re y.re))))) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) y.re) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) y.re) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) y.re) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) y.re) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (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 (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 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) y.im) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) y.im) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) y.im) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) y.im) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.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 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (sqrt.f64 (*.f64 x.re x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (sqrt.f64 (*.f64 x.re x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (-.f64 (sqrt.f64 (*.f64 x.re x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (sqrt.f64 (*.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 (*.f64 x.re x.re) #s(literal 3/2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 (*.f64 x.re x.re) #s(literal 5/2 binary64))) (*.f64 #s(literal -1/8 binary64) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 x.re x.re))))))))
#s(approx x.im x.im)
#s(approx (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 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.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 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.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 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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)))))))) (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 (*.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))))))))))) (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 (*.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 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.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 (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 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 y.re y.re))))) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 y.re y.re))))) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) y.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) y.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) y.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) y.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (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 (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 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) y.im) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) y.im) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) y.im) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) y.im) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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)))))))) (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 (*.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))))))))))) (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 (*.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 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.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 (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 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 y.re y.re))))) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 y.re y.re))))) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) y.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) y.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) y.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) y.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (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 (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 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) y.im) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) y.im) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) y.im) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) y.im) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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 (-.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 (+.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.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))))))

eval109.0ms (1.2%)

Memory
-7.0MiB live, 177.7MiB allocated; 104ms collecting garbage
Compiler

Compiled 13 555 to 2 640 computations (80.5% saved)

prune46.0ms (0.5%)

Memory
29.7MiB live, 115.9MiB allocated; 19ms collecting garbage
Pruning

20 alts after pruning (20 fresh and 0 done)

PrunedKeptTotal
New30220322
Fresh000
Picked101
Done000
Total30320323
Accuracy
96.5%
Counts
323 → 20
Alt Table
Click to see full alt table
StatusAccuracyProgram
27.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 (*.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)))))
▶31.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)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
▶16.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 #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)))))))
37.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 #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))))))))
23.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))) #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))))))
15.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 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))))))))))
48.9%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (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)))))))))
39.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))) #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)))))))
43.5%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (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))))))
▶54.5%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (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)))))
36.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 (+.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))))
▶28.9%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.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))))
15.3%
(*.f64 (exp.f64 (-.f64 #s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.im))) (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))))
18.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 (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 (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))))
36.7%
(*.f64 (exp.f64 (-.f64 #s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.im))) (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))))
34.9%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (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))))
▶45.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)))
30.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 (exp.f64 (-.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))))))
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 #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))))))
24.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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 610 to 1 310 computations (18.6% saved)

series559.0ms (6.2%)

Memory
-47.8MiB live, 684.3MiB allocated; 289ms collecting garbage
Counts
53 → 364
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (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)))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
#s(approx (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))))
(sin.f64 (*.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))
(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 (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))))
(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)))
(-.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))
(*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.re)
(log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
(*.f64 #s(literal -1 binary64) x.im)
#s(literal -1 binary64)
(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 (*.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 (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 (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 (neg.f64 (log.f64 x.im))) (*.f64 y.re (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)) (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))) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.im (neg.f64 (log.f64 x.im)))
(neg.f64 (log.f64 x.im))
(log.f64 x.im)
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (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.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)))))))
(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.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/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)))))
(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))))
(*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))
(log.f64 (/.f64 #s(literal -1 binary64) x.im))
(/.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(literal 1/2 binary64)
(/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))
(*.f64 (*.f64 x.re 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)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 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)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4))))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.im 2)) 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 2))) (* y.re (log (sqrt (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 2))) (* y.re (log (sqrt (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log (sqrt (pow x.im 2)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* 1/2 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ 1 (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 6))) (* 1/4 (/ 1 (pow (sqrt (pow x.im 2)) 4))))) (* 1/2 (/ 1 (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (sqrt (pow x.im 2))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* 1/2 (/ (pow x.re 2) (sqrt (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 3))) (* 1/2 (/ 1 (sqrt (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 5))) (* 1/8 (/ 1 (pow (sqrt (pow x.im 2)) 3))))) (* 1/2 (/ 1 (sqrt (pow x.im 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (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)))) (* 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 (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.im 2)) 6)))))))))))))))
#s(approx (sin (* 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 (* (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)) 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 (sqrt (pow x.im 2)) y.re)))) (pow (sqrt (pow x.im 2)) 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) 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 (sqrt (pow x.im 2)) y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) y.re))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))) (pow (sqrt (pow x.im 2)) y.re)))))))))
#s(approx (* (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)) y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) y.re))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))) (pow (sqrt (pow x.im 2)) y.re))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))) (pow (sqrt (pow x.im 2)) y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (pow x.im 2)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow (sqrt (pow x.im 2)) y.re))) (pow (sqrt (pow x.im 2)) 2))) (pow (sqrt (pow x.im 2)) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow (sqrt (pow x.im 2)) y.re)) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))) (pow (sqrt (pow x.im 2)) y.re))))) (pow (sqrt (pow x.im 2)) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow (sqrt (pow x.im 2)) y.re)) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))) (pow (sqrt (pow x.im 2)) y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))) (pow (sqrt (pow x.im 2)) y.re))))))) (pow (sqrt (pow x.im 2)) y.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 2))) (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 6)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 2))) (* y.im (log (sqrt (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 6))))))))))
#s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.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 (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))
#s(approx (/ (* (* x.re x.re) y.im) (* x.im x.im)) #s(hole binary64 (/ (* (pow x.re 2) y.im) (pow x.im 2))))
#s(approx (* (* x.re x.re) y.im) #s(hole binary64 (* (pow x.re 2) y.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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 (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (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 (* (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 (+ (* (log (sqrt (+ (* x.re x.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 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (* y.im (log (/ -1 x.im))) (pow x.re 2))) (+ (* 1/2 (/ y.im (pow x.im 2))) (/ (* y.re (atan2 x.im x.re)) (pow x.re 2)))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (/ (* 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 (- (* -1 (* y.re (log (/ -1 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 (* (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 (+ (* (log (sqrt (+ (* x.re x.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 (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 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.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4))))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.re 2)) 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 2))) (* y.re (log (sqrt (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 2))) (* y.re (log (sqrt (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log (sqrt (pow x.re 2)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* 1/2 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ 1 (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 6))) (* 1/4 (/ 1 (pow (sqrt (pow x.re 2)) 4))))) (* 1/2 (/ 1 (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (sqrt (pow x.re 2))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* 1/2 (/ (pow x.im 2) (sqrt (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 3))) (* 1/2 (/ 1 (sqrt (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 5))) (* 1/8 (/ 1 (pow (sqrt (pow x.re 2)) 3))))) (* 1/2 (/ 1 (sqrt (pow x.re 2)))))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (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.re 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.re 2)) 6)))))))))))))))
#s(approx (* (sin (* 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.re 2)) 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 (sqrt (pow x.re 2)) y.re)))) (pow (sqrt (pow x.re 2)) 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) 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 (sqrt (pow x.re 2)) y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) y.re))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))) (pow (sqrt (pow x.re 2)) y.re)))))))))
#s(approx (* (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.re 2)) y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) y.re))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))) (pow (sqrt (pow x.re 2)) y.re))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))) (pow (sqrt (pow x.re 2)) y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (pow x.re 2)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow (sqrt (pow x.re 2)) y.re))) (pow (sqrt (pow x.re 2)) 2))) (pow (sqrt (pow x.re 2)) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow (sqrt (pow x.re 2)) y.re)) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))) (pow (sqrt (pow x.re 2)) y.re))))) (pow (sqrt (pow x.re 2)) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow (sqrt (pow x.re 2)) y.re)) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))) (pow (sqrt (pow x.re 2)) y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))) (pow (sqrt (pow x.re 2)) y.re))))))) (pow (sqrt (pow x.re 2)) y.re))))
#s(approx (* -1 x.im) #s(hole binary64 (* -1 x.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 2))) (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 6)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 2))) (* y.im (log (sqrt (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 6))))))))))
#s(approx (* y.im (neg (log x.im))) #s(hole binary64 (* -1 (* y.im (log x.im)))))
#s(approx (neg (log x.im)) #s(hole binary64 (* -1 (log x.im))))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (/ (+ (* 1/2 (* (pow x.re 2) y.im)) (* (pow x.im 2) (+ (* y.im (log (neg x.im))) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))
#s(approx (* y.im (log (/ -1 x.im))) #s(hole binary64 (* -1 (* y.im (log (neg x.im))))))
#s(approx (log (/ -1 x.im)) #s(hole binary64 (* -1 (log (neg x.im)))))
#s(approx (/ -1 x.im) #s(hole binary64 (/ -1 x.im)))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (/ (+ (* 1/2 (* (pow x.re 2) y.im)) (* (pow x.im 2) (* 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 (- (* -1 (* y.re (log (/ 1 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 (* (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 (+ (* (log (sqrt (+ (* x.re x.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 (* y.im (neg (log x.im))) #s(hole binary64 (* y.im (log (/ 1 x.im)))))
#s(approx (neg (log x.im)) #s(hole binary64 (log (/ 1 x.im))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (log (neg (/ 1 x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (log (neg (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (* y.im (log (/ -1 x.im))) #s(hole binary64 (* y.im (log (neg (/ 1 x.im))))))
#s(approx (log (/ -1 x.im)) #s(hole binary64 (log (neg (/ 1 x.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #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 (+ 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 (* (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 (+ (* (log (sqrt (+ (* x.re x.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 (* y.im (log (/ -1 x.im))) #s(hole binary64 (* y.im (log (/ -1 x.im)))))
#s(approx (log (/ -1 x.im)) #s(hole binary64 (log (/ -1 x.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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 (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 (* (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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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)))) (* -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 (* (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 (+ (* (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 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* 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.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (* -1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #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 (+ (* -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))) (* 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 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 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 (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (log (/ -1 x.im))) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (* 1/2 (/ (pow x.re 2) (pow x.im 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)))))))
#s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (+ (log (/ -1 x.im)) (* -1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (+ (log (/ -1 x.im)) (+ (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)) (* -1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)) (* -1/2 (/ (pow x.re 2) (pow x.im 2))))))))
Calls

12 calls:

TimeVariablePointExpression
113.0ms
y.im
@inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (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))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 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 (- (* (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.im) -1 (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) (* (atan2 x.im x.re) y.re)))) (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)) (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (* y.im (neg (log x.im))) (neg (log x.im)) (log 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 (+ (* (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)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (* y.im (log (/ -1 x.im))) (log (/ -1 x.im)) (/ -1 x.im) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im)) (* (* x.re x.re) y.im))
74.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))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 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 (- (* (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.im) -1 (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) (* (atan2 x.im x.re) y.re)))) (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)) (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (* y.im (neg (log x.im))) (neg (log x.im)) (log 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 (+ (* (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)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (* y.im (log (/ -1 x.im))) (log (/ -1 x.im)) (/ -1 x.im) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im)) (* (* x.re x.re) y.im))
49.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))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 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 (- (* (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.im) -1 (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) (* (atan2 x.im x.re) y.re)))) (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)) (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (* y.im (neg (log x.im))) (neg (log x.im)) (log 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 (+ (* (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)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (* y.im (log (/ -1 x.im))) (log (/ -1 x.im)) (/ -1 x.im) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im)) (* (* x.re x.re) y.im))
46.0ms
y.im
@-inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (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))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 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 (- (* (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.im) -1 (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) (* (atan2 x.im x.re) y.re)))) (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)) (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (* y.im (neg (log x.im))) (neg (log x.im)) (log 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 (+ (* (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)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (* y.im (log (/ -1 x.im))) (log (/ -1 x.im)) (/ -1 x.im) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im)) (* (* x.re x.re) y.im))
38.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))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 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 (- (* (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.im) -1 (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) (* (atan2 x.im x.re) y.re)))) (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)) (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (* y.im (neg (log x.im))) (neg (log x.im)) (log 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 (+ (* (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)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (* y.im (log (/ -1 x.im))) (log (/ -1 x.im)) (/ -1 x.im) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im)) (* (* x.re x.re) y.im))

rewrite286.0ms (3.2%)

Memory
49.5MiB live, 376.6MiB allocated; 42ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0208326781
0216126167
0914622930
Stop Event
1×iter-limit
1×node-limit
1×iter-limit
Counts
417 → 488
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (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)))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
#s(approx (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))))
(sin.f64 (*.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))
(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 (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))))
(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)))
(-.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))
(*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.re)
(log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
(*.f64 #s(literal -1 binary64) x.im)
#s(literal -1 binary64)
(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 (*.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 (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 (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 (neg.f64 (log.f64 x.im))) (*.f64 y.re (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)) (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))) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.im (neg.f64 (log.f64 x.im)))
(neg.f64 (log.f64 x.im))
(log.f64 x.im)
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (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.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)))))))
(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.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/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)))))
(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))))
(*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))
(log.f64 (/.f64 #s(literal -1 binary64) x.im))
(/.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(literal 1/2 binary64)
(/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))
(*.f64 (*.f64 x.re x.re) y.im)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 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)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4))))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.im 2)) 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 2))) (* y.re (log (sqrt (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 2))) (* y.re (log (sqrt (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log (sqrt (pow x.im 2)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* 1/2 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ 1 (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 6))) (* 1/4 (/ 1 (pow (sqrt (pow x.im 2)) 4))))) (* 1/2 (/ 1 (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (sqrt (pow x.im 2))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* 1/2 (/ (pow x.re 2) (sqrt (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 3))) (* 1/2 (/ 1 (sqrt (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 5))) (* 1/8 (/ 1 (pow (sqrt (pow x.im 2)) 3))))) (* 1/2 (/ 1 (sqrt (pow x.im 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (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)))) (* 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 (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.im 2)) 6)))))))))))))))
#s(approx (sin (* 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 (* (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)) 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 (sqrt (pow x.im 2)) y.re)))) (pow (sqrt (pow x.im 2)) 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) 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 (sqrt (pow x.im 2)) y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) y.re))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))) (pow (sqrt (pow x.im 2)) y.re)))))))))
#s(approx (* (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)) y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) y.re))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))) (pow (sqrt (pow x.im 2)) y.re))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))) (pow (sqrt (pow x.im 2)) y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (pow x.im 2)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow (sqrt (pow x.im 2)) y.re))) (pow (sqrt (pow x.im 2)) 2))) (pow (sqrt (pow x.im 2)) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow (sqrt (pow x.im 2)) y.re)) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))) (pow (sqrt (pow x.im 2)) y.re))))) (pow (sqrt (pow x.im 2)) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow (sqrt (pow x.im 2)) y.re)) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))) (pow (sqrt (pow x.im 2)) y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))) (pow (sqrt (pow x.im 2)) y.re))))))) (pow (sqrt (pow x.im 2)) y.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 2))) (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 6)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 2))) (* y.im (log (sqrt (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 6))))))))))
#s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.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 (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))
#s(approx (/ (* (* x.re x.re) y.im) (* x.im x.im)) #s(hole binary64 (/ (* (pow x.re 2) y.im) (pow x.im 2))))
#s(approx (* (* x.re x.re) y.im) #s(hole binary64 (* (pow x.re 2) y.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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 (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (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 (* (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 (+ (* (log (sqrt (+ (* x.re x.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 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (* y.im (log (/ -1 x.im))) (pow x.re 2))) (+ (* 1/2 (/ y.im (pow x.im 2))) (/ (* y.re (atan2 x.im x.re)) (pow x.re 2)))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (/ (* 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 (- (* -1 (* y.re (log (/ -1 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 (* (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 (+ (* (log (sqrt (+ (* x.re x.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 (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 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.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4))))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.re 2)) 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 2))) (* y.re (log (sqrt (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 2))) (* y.re (log (sqrt (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log (sqrt (pow x.re 2)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* 1/2 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ 1 (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 6))) (* 1/4 (/ 1 (pow (sqrt (pow x.re 2)) 4))))) (* 1/2 (/ 1 (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (sqrt (pow x.re 2))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* 1/2 (/ (pow x.im 2) (sqrt (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 3))) (* 1/2 (/ 1 (sqrt (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 5))) (* 1/8 (/ 1 (pow (sqrt (pow x.re 2)) 3))))) (* 1/2 (/ 1 (sqrt (pow x.re 2)))))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (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.re 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.re 2)) 6)))))))))))))))
#s(approx (* (sin (* 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.re 2)) 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 (sqrt (pow x.re 2)) y.re)))) (pow (sqrt (pow x.re 2)) 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) 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 (sqrt (pow x.re 2)) y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) y.re))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))) (pow (sqrt (pow x.re 2)) y.re)))))))))
#s(approx (* (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.re 2)) y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) y.re))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))) (pow (sqrt (pow x.re 2)) y.re))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))) (pow (sqrt (pow x.re 2)) y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (pow x.re 2)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow (sqrt (pow x.re 2)) y.re))) (pow (sqrt (pow x.re 2)) 2))) (pow (sqrt (pow x.re 2)) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow (sqrt (pow x.re 2)) y.re)) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))) (pow (sqrt (pow x.re 2)) y.re))))) (pow (sqrt (pow x.re 2)) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow (sqrt (pow x.re 2)) y.re)) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))) (pow (sqrt (pow x.re 2)) y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))) (pow (sqrt (pow x.re 2)) y.re))))))) (pow (sqrt (pow x.re 2)) y.re))))
#s(approx (* -1 x.im) #s(hole binary64 (* -1 x.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 2))) (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 6)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 2))) (* y.im (log (sqrt (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 6))))))))))
#s(approx (* y.im (neg (log x.im))) #s(hole binary64 (* -1 (* y.im (log x.im)))))
#s(approx (neg (log x.im)) #s(hole binary64 (* -1 (log x.im))))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (/ (+ (* 1/2 (* (pow x.re 2) y.im)) (* (pow x.im 2) (+ (* y.im (log (neg x.im))) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))
#s(approx (* y.im (log (/ -1 x.im))) #s(hole binary64 (* -1 (* y.im (log (neg x.im))))))
#s(approx (log (/ -1 x.im)) #s(hole binary64 (* -1 (log (neg x.im)))))
#s(approx (/ -1 x.im) #s(hole binary64 (/ -1 x.im)))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (/ (+ (* 1/2 (* (pow x.re 2) y.im)) (* (pow x.im 2) (* 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 (- (* -1 (* y.re (log (/ 1 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 (* (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 (+ (* (log (sqrt (+ (* x.re x.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 (* y.im (neg (log x.im))) #s(hole binary64 (* y.im (log (/ 1 x.im)))))
#s(approx (neg (log x.im)) #s(hole binary64 (log (/ 1 x.im))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (log (neg (/ 1 x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (log (neg (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (* y.im (log (/ -1 x.im))) #s(hole binary64 (* y.im (log (neg (/ 1 x.im))))))
#s(approx (log (/ -1 x.im)) #s(hole binary64 (log (neg (/ 1 x.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #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 (+ 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 (* (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 (+ (* (log (sqrt (+ (* x.re x.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 (* y.im (log (/ -1 x.im))) #s(hole binary64 (* y.im (log (/ -1 x.im)))))
#s(approx (log (/ -1 x.im)) #s(hole binary64 (log (/ -1 x.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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 (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 (* (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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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)))) (* -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 (* (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 (+ (* (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 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* 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.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (* -1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #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 (+ (* -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))) (* 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 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 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 (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (log (/ -1 x.im))) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (* 1/2 (/ (pow x.re 2) (pow x.im 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)))))))
#s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (+ (log (/ -1 x.im)) (* -1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (+ (log (/ -1 x.im)) (+ (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)) (* -1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)) (* -1/2 (/ (pow x.re 2) (pow x.im 2))))))))
Outputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (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)))))
(/.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)))))
(-.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 (*.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 (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
#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))))
(sin.f64 (*.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))
(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 (*.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 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re))
(fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
(*.f64 (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 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (exp.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) 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.im))) 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.im))) 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.im))) 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.im))) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) 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 #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)))
(/.f64 (-.f64 (pow.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) 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 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) 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 #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)))))
(-.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))
(*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.re)
(log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
(*.f64 #s(literal -1 binary64) x.im)
#s(literal -1 binary64)
(sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(fma.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) 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.im))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) 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.im))) y.im) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) 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 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) 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 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) 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 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.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 (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)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (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)) (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))) (*.f64 y.re (atan2.f64 x.im x.re))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) #s(literal 3 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (-.f64 (*.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
(fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))
(+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.im (neg.f64 (log.f64 x.im)))
(log.f64 (pow.f64 (/.f64 #s(literal 1 binary64) x.im) y.im))
(*.f64 #s(literal -1 binary64) (log.f64 x.im))
(neg.f64 (log.f64 x.im))
(-.f64 #s(literal 0 binary64) (log.f64 x.im))
(log.f64 (/.f64 #s(literal 1 binary64) x.im))
(log.f64 x.im)
(*.f64 (exp.f64 (-.f64 (*.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)) (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)))))))
(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.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/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)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (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))))) (-.f64 (*.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)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 3 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (-.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (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)))) (*.f64 (*.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)))))))
(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))))
(+.f64 (*.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))))
(*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))
(-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))
(log.f64 (/.f64 #s(literal -1 binary64) x.im))
(/.f64 #s(literal 1 binary64) (neg.f64 x.im))
(/.f64 #s(literal -1 binary64) x.im)
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.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)))) (*.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.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))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))) #s(literal 3 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.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))) (-.f64 (*.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (*.f64 #s(literal 1/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))))))
(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)))
(+.f64 (*.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(literal 1/2 binary64)
(*.f64 (/.f64 (*.f64 x.re x.re) x.im) (/.f64 y.im x.im))
(/.f64 (neg.f64 (*.f64 (*.f64 x.re x.re) y.im)) (neg.f64 (*.f64 x.im x.im)))
(/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))
(*.f64 (*.f64 x.re x.re) y.im)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (sqrt.f64 (*.f64 x.im x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (sqrt.f64 (*.f64 x.im x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3/2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 (*.f64 x.im x.im) #s(literal 5/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 x.im x.im))))))))
#s(approx (+ (* x.re x.re) (* 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 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.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 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.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 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))))))))))))
#s(approx (sin (* 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 (* (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 (*.f64 x.im 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 (sqrt.f64 (*.f64 x.im x.im)) y.re)))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (*.f64 x.im 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 (sqrt.f64 (*.f64 x.im x.im)) y.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))))))))
#s(approx (* (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 (sqrt.f64 (*.f64 x.im x.im)) y.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)) (*.f64 (*.f64 x.re x.re) (*.f64 (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 (*.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))))))
#s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.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 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/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 (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) (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 (/ (* (* x.re x.re) y.im) (* x.im x.im)) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))
#s(approx (* (* x.re x.re) y.im) (*.f64 (*.f64 x.re x.re) y.im))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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))) (*.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 (*.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 (* (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 (+ (* (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 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 x.re x.re))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 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 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)))) (*.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 (* (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 (+ (* (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 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.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 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (sqrt.f64 (*.f64 x.re x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (sqrt.f64 (*.f64 x.re x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (sqrt.f64 (*.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 (*.f64 x.re x.re) #s(literal 3/2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 (*.f64 x.re x.re) #s(literal 5/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 x.re x.re))))))))
#s(approx x.im x.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.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 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.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 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))))))))))))))
#s(approx (* (sin (* 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 (*.f64 x.re 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 (sqrt.f64 (*.f64 x.re x.re)) y.re)))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (*.f64 x.re 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 (sqrt.f64 (*.f64 x.re x.re)) y.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))))))))
#s(approx (* (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 (sqrt.f64 (*.f64 x.re x.re)) y.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (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 (*.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)))))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)))
#s(approx (* -1 x.im) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))))))))
#s(approx (* y.im (neg (log x.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 x.im))))
#s(approx (neg (log x.im)) (neg.f64 (log.f64 x.im)))
#s(approx (log x.im) (log.f64 x.im))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (*.f64 x.im x.im) (fma.f64 y.im (log.f64 (neg.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))
#s(approx (* y.im (log (/ -1 x.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (neg.f64 x.im)))))
#s(approx (log (/ -1 x.im)) (*.f64 #s(literal -1 binary64) (log.f64 (neg.f64 x.im))))
#s(approx (/ -1 x.im) (/.f64 #s(literal -1 binary64) x.im))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (*.f64 x.im 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)))) (*.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 (* (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 (+ (* (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 (* y.im (neg (log x.im))) (*.f64 y.im (neg.f64 (log.f64 x.im))))
#s(approx (neg (log x.im)) (neg.f64 (log.f64 x.im)))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* y.im (log (/ -1 x.im))) (*.f64 y.im (log.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x.im)))))
#s(approx (log (/ -1 x.im)) (log.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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) (*.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 (* (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 (+ (* (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 (* y.im (log (/ -1 x.im))) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))
#s(approx (log (/ -1 x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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 (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 (* (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 (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 (+ (* (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 (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (*.f64 y.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))) (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 (+.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 (* (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 (+ (* (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 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (*.f64 x.im x.im) y.re)) (atan2.f64 x.im x.re)))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (*.f64 x.im x.im) y.re)) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.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)))) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (*.f64 x.im x.im) y.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (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))) (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))) (+.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 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (fma.f64 y.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)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 y.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 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (neg.f64 (log.f64 x.im)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (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 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.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.im) (* x.im x.im))) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))

eval101.0ms (1.1%)

Memory
-28.0MiB live, 157.1MiB allocated; 42ms collecting garbage
Compiler

Compiled 24 049 to 3 715 computations (84.6% saved)

prune50.0ms (0.6%)

Memory
4.3MiB live, 51.0MiB allocated; 2ms collecting garbage
Pruning

24 alts after pruning (24 fresh and 0 done)

PrunedKeptTotal
New79318811
Fresh9615
Picked505
Done000
Total80724831
Accuracy
98.1%
Counts
831 → 24
Alt Table
Click to see full alt table
StatusAccuracyProgram
16.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))) (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.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) x.im) (/.f64 y.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
19.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 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
24.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)) #s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.im))))))
▶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 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
23.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))) #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))))))
▶48.9%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (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)))))))))
36.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 (+.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))))
28.9%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) 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.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
9.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.im))) 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.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 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) 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 #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)))))))
12.6%
(*.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 #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))))))
34.9%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (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.6%
(*.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)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
41.3%
(*.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))))) #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)))))
▶47.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 (hypot.f64 x.im x.re) y.re)))
39.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 (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 (sqrt.f64 (*.f64 x.re x.re)) y.re))))
36.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))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))))
19.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))) #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))))))))
25.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 (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) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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)))) (*.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))))
30.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 (exp.f64 (-.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))))))
24.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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))))))))
▶28.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 (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)))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
33.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 (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)))
16.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(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)))))
Compiler

Compiled 1 954 to 1 560 computations (20.2% saved)

series234.0ms (2.6%)

Memory
28.2MiB live, 396.4MiB allocated; 88ms collecting garbage
Counts
57 → 423
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (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)))))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
#s(approx (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))))))))
(+.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)))))))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.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))))))
(*.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)))))
(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))))
(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 (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))))
(*.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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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 (hypot.f64 x.im x.re) y.re)))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))
(pow.f64 (hypot.f64 x.im x.re) y.re)
(hypot.f64 x.im x.re)
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
(sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.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) (* (atan2 x.im x.re) y.re)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.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(literal 1/2 binary64)
(/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))
(*.f64 (*.f64 x.re x.re) y.im)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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 (*.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)))) (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 (*.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)))) (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 (*.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))))
(*.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)))
(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))
(*.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)))))
#s(literal -1/6 binary64)
(pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))
#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))))
#s(literal 1/120 binary64)
(*.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))
(pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))
#s(literal 5 binary64)
(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)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 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)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4))))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.im 2)) 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 2))) (* y.re (log (sqrt (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 2))) (* y.re (log (sqrt (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log (sqrt (pow x.im 2)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* 1/2 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ 1 (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 6))) (* 1/4 (/ 1 (pow (sqrt (pow x.im 2)) 4))))) (* 1/2 (/ 1 (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (sqrt (pow x.im 2))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* 1/2 (/ (pow x.re 2) (sqrt (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 3))) (* 1/2 (/ 1 (sqrt (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 5))) (* 1/8 (/ 1 (pow (sqrt (pow x.im 2)) 3))))) (* 1/2 (/ 1 (sqrt (pow x.im 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (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)))) (* 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 (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.im 2)) 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.im 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.im 2)) 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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) (+ (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 6)))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.im 2)))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.im 2))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.im 2))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.im 2))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 6))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.im 2)) 2))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.im 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.im 2)) 6))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (cos (* 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)) 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 (sqrt (pow x.im 2)) y.re)))) (pow (sqrt (pow x.im 2)) 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) 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 (sqrt (pow x.im 2)) y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) y.re))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))) (pow (sqrt (pow x.im 2)) y.re)))))))))
#s(approx (* (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)) y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) y.re))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))) (pow (sqrt (pow x.im 2)) y.re))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))) (pow (sqrt (pow x.im 2)) y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (pow x.im 2)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow (sqrt (pow x.im 2)) y.re))) (pow (sqrt (pow x.im 2)) 2))) (pow (sqrt (pow x.im 2)) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow (sqrt (pow x.im 2)) y.re)) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))) (pow (sqrt (pow x.im 2)) y.re))))) (pow (sqrt (pow x.im 2)) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow (sqrt (pow x.im 2)) y.re)) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))) (pow (sqrt (pow x.im 2)) y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))) (pow (sqrt (pow x.im 2)) y.re))))))) (pow (sqrt (pow x.im 2)) y.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 2))) (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 6)))))))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.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 (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) #s(hole binary64 (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))
#s(approx (/ (* (* x.re x.re) y.im) (* x.im x.im)) #s(hole binary64 (/ (* (pow x.re 2) y.im) (pow x.im 2))))
#s(approx (* (* x.re x.re) y.im) #s(hole binary64 (* (pow x.re 2) y.im)))
#s(approx (* y.re (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (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 (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (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 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5)))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))))
#s(approx (pow (atan2 x.im x.re) 3) #s(hole binary64 (pow (atan2 x.im x.re) 3)))
#s(approx (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))) #s(hole binary64 (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5)))))
#s(approx (* (* y.re y.re) (pow (atan2 x.im x.re) 5)) #s(hole binary64 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))
#s(approx (pow (atan2 x.im x.re) 5) #s(hole binary64 (pow (atan2 x.im x.re) 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)))) #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 (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -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 (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (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 (* (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 (+ (* (log (sqrt (+ (* x.re x.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 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (* y.im (log (/ -1 x.im))) (pow x.re 2))) (+ (* 1/2 (/ y.im (pow x.im 2))) (/ (* 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 (- (* -1 (* y.re (log (/ -1 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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -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 (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (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 (* (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 (+ (* (log (sqrt (+ (* x.re x.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 (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 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.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4))))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.re 2)) 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 2))) (* y.re (log (sqrt (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 2))) (* y.re (log (sqrt (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log (sqrt (pow x.re 2)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* 1/2 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ 1 (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 6))) (* 1/4 (/ 1 (pow (sqrt (pow x.re 2)) 4))))) (* 1/2 (/ 1 (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (sqrt (pow x.re 2))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* 1/2 (/ (pow x.im 2) (sqrt (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 3))) (* 1/2 (/ 1 (sqrt (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 5))) (* 1/8 (/ 1 (pow (sqrt (pow x.re 2)) 3))))) (* 1/2 (/ 1 (sqrt (pow x.re 2)))))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (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.re 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.re 2)) 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.re 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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.re 2))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.re 2)) 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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.re 2))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 6)))))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.re 2)))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.re 2))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.re 2))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.re 2))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 6))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.re 2)) 2))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.re 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.re 2)) 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 (sqrt (pow x.re 2)) 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 (sqrt (pow x.re 2)) y.re)))) (pow (sqrt (pow x.re 2)) 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) 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 (sqrt (pow x.re 2)) y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) y.re))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))) (pow (sqrt (pow x.re 2)) y.re)))))))))
#s(approx (* (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.re 2)) y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) y.re))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))) (pow (sqrt (pow x.re 2)) y.re))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))) (pow (sqrt (pow x.re 2)) y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (pow x.re 2)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow (sqrt (pow x.re 2)) y.re))) (pow (sqrt (pow x.re 2)) 2))) (pow (sqrt (pow x.re 2)) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow (sqrt (pow x.re 2)) y.re)) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))) (pow (sqrt (pow x.re 2)) y.re))))) (pow (sqrt (pow x.re 2)) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow (sqrt (pow x.re 2)) y.re)) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))) (pow (sqrt (pow x.re 2)) y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))) (pow (sqrt (pow x.re 2)) y.re))))))) (pow (sqrt (pow x.re 2)) y.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 2))) (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 6)))))))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (/ (+ (* 1/2 (* (pow x.re 2) y.im)) (* (pow x.im 2) (+ (* y.im (log (neg 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 (- (* -1 (* y.re (log (/ 1 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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 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 (* (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 (+ (* (log (sqrt (+ (* x.re x.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 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (log (neg (/ 1 x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (log (neg (/ 1 x.im))))) (+ (* 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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 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 (* (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 (+ (* (log (sqrt (+ (* x.re x.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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* 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 (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (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 (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (+ (* y.re (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (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 (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)) (* (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.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* (pow y.re 2) (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* 1/24 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* (pow y.re 2) (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* (pow y.re 2) (+ (* -1/720 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 6))))) (* 1/24 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4)))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/2 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow y.re 2) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/24 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow y.re 2) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 6)))) (* 1/24 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (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 (* (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 (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 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (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) #s(hole binary64 (pow y.re 2)))
#s(approx (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5)))) #s(hole binary64 (* -1/6 (pow (atan2 x.im x.re) 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(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)))) (* -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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (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 (* (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 (+ (* (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 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) #s(hole binary64 (* 1/120 (* (pow y.re 5) (pow (atan2 x.im x.re) 5)))))
#s(approx (* y.re (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) #s(hole binary64 (* (pow y.re 5) (+ (* -1/6 (/ (pow (atan2 x.im x.re) 3) (pow y.re 2))) (* 1/120 (pow (atan2 x.im x.re) 5))))))
#s(approx (* y.re (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) #s(hole binary64 (* (pow y.re 5) (+ (* -1/6 (/ (pow (atan2 x.im x.re) 3) (pow y.re 2))) (+ (* 1/120 (pow (atan2 x.im x.re) 5)) (/ (atan2 x.im x.re) (pow y.re 4)))))))
#s(approx (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)) #s(hole binary64 (* 1/120 (* (pow y.re 4) (pow (atan2 x.im x.re) 5)))))
#s(approx (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)) #s(hole binary64 (* (pow y.re 4) (+ (* -1/6 (/ (pow (atan2 x.im x.re) 3) (pow y.re 2))) (* 1/120 (pow (atan2 x.im x.re) 5))))))
#s(approx (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)) #s(hole binary64 (* (pow y.re 4) (+ (* -1/6 (/ (pow (atan2 x.im x.re) 3) (pow y.re 2))) (+ (* 1/120 (pow (atan2 x.im x.re) 5)) (/ (atan2 x.im x.re) (pow y.re 4)))))))
#s(approx (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5)))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/6 (/ (pow (atan2 x.im x.re) 3) (pow y.re 2))) (* 1/120 (pow (atan2 x.im x.re) 5))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* (pow y.re 5) (+ (* -1/120 (pow (atan2 x.im x.re) 5)) (* 1/6 (/ (pow (atan2 x.im x.re) 3) (pow y.re 2))))))))
#s(approx (* y.re (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* (pow y.re 5) (+ (* -1 (/ (atan2 x.im x.re) (pow y.re 4))) (+ (* -1/120 (pow (atan2 x.im x.re) 5)) (* 1/6 (/ (pow (atan2 x.im x.re) 3) (pow y.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.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 (+ (* -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))) (* 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 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (sin (* y.re (atan2 x.im x.re))) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (log (/ -1 x.im))) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (/ (sin (* y.re (atan2 x.im x.re))) y.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (+ (log (/ -1 x.im)) (* -1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (+ (log (/ -1 x.im)) (+ (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)) (* -1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
Calls

12 calls:

TimeVariablePointExpression
34.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))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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)))) (* (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (+ (* (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)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im)) (* (* x.re x.re) y.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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 (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)) (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5)))) -1/6 (pow (atan2 x.im x.re) 3) 3 (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))) 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5)) (pow (atan2 x.im x.re) 5) 5 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))
23.0ms
y.im
@inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (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))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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)))) (* (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (+ (* (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)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im)) (* (* x.re x.re) y.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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 (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)) (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5)))) -1/6 (pow (atan2 x.im x.re) 3) 3 (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))) 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5)) (pow (atan2 x.im x.re) 5) 5 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))
21.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))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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)))) (* (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (+ (* (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)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im)) (* (* x.re x.re) y.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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 (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)) (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5)))) -1/6 (pow (atan2 x.im x.re) 3) 3 (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))) 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5)) (pow (atan2 x.im x.re) 5) 5 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))
19.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))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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)))) (* (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (+ (* (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)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im)) (* (* x.re x.re) y.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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 (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)) (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5)))) -1/6 (pow (atan2 x.im x.re) 3) 3 (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))) 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5)) (pow (atan2 x.im x.re) 5) 5 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))
17.0ms
x.im
@-inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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)))) (* (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (+ (* (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)) (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im)) (* (* x.re x.re) y.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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 (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)) (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5)))) -1/6 (pow (atan2 x.im x.re) 3) 3 (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))) 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5)) (pow (atan2 x.im x.re) 5) 5 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))

rewrite301.0ms (3.3%)

Memory
7.2MiB live, 333.1MiB allocated; 71ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0239631260
0247830025
0843427524
Stop Event
1×iter-limit
1×node-limit
1×iter-limit
Counts
480 → 551
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (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)))))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
#s(approx (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))))))))
(+.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)))))))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.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))))))
(*.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)))))
(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))))
(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 (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))))
(*.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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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 (hypot.f64 x.im x.re) y.re)))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))
(pow.f64 (hypot.f64 x.im x.re) y.re)
(hypot.f64 x.im x.re)
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
(sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.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) (* (atan2 x.im x.re) y.re)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.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(literal 1/2 binary64)
(/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))
(*.f64 (*.f64 x.re x.re) y.im)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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 (*.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)))) (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 (*.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)))) (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 (*.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))))
(*.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)))
(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))
(*.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)))))
#s(literal -1/6 binary64)
(pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))
#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))))
#s(literal 1/120 binary64)
(*.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))
(pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))
#s(literal 5 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)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 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)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4))))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.im 2)) 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 2))) (* y.re (log (sqrt (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 2))) (* y.re (log (sqrt (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log (sqrt (pow x.im 2)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* 1/2 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ 1 (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 6))) (* 1/4 (/ 1 (pow (sqrt (pow x.im 2)) 4))))) (* 1/2 (/ 1 (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (sqrt (pow x.im 2))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* 1/2 (/ (pow x.re 2) (sqrt (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 3))) (* 1/2 (/ 1 (sqrt (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 5))) (* 1/8 (/ 1 (pow (sqrt (pow x.im 2)) 3))))) (* 1/2 (/ 1 (sqrt (pow x.im 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (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)))) (* 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 (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.im 2)) 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.im 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.im 2)) 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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) (+ (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 6)))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.im 2)))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.im 2))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.im 2))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.im 2))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 6))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.im 2)) 2))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.im 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.im 2)) 6))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (cos (* 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)) 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 (sqrt (pow x.im 2)) y.re)))) (pow (sqrt (pow x.im 2)) 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) 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 (sqrt (pow x.im 2)) y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) y.re))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))) (pow (sqrt (pow x.im 2)) y.re)))))))))
#s(approx (* (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)) y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) y.re))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))) (pow (sqrt (pow x.im 2)) y.re))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))) (pow (sqrt (pow x.im 2)) y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (pow x.im 2)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow (sqrt (pow x.im 2)) y.re))) (pow (sqrt (pow x.im 2)) 2))) (pow (sqrt (pow x.im 2)) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow (sqrt (pow x.im 2)) y.re)) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))) (pow (sqrt (pow x.im 2)) y.re))))) (pow (sqrt (pow x.im 2)) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow (sqrt (pow x.im 2)) y.re)) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))) (pow (sqrt (pow x.im 2)) y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))) (pow (sqrt (pow x.im 2)) y.re))))))) (pow (sqrt (pow x.im 2)) y.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 2))) (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 6)))))))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.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 (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) #s(hole binary64 (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))
#s(approx (/ (* (* x.re x.re) y.im) (* x.im x.im)) #s(hole binary64 (/ (* (pow x.re 2) y.im) (pow x.im 2))))
#s(approx (* (* x.re x.re) y.im) #s(hole binary64 (* (pow x.re 2) y.im)))
#s(approx (* y.re (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (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 (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (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 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5)))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))))
#s(approx (pow (atan2 x.im x.re) 3) #s(hole binary64 (pow (atan2 x.im x.re) 3)))
#s(approx (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))) #s(hole binary64 (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5)))))
#s(approx (* (* y.re y.re) (pow (atan2 x.im x.re) 5)) #s(hole binary64 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))
#s(approx (pow (atan2 x.im x.re) 5) #s(hole binary64 (pow (atan2 x.im x.re) 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)))) #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 (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -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 (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (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 (* (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 (+ (* (log (sqrt (+ (* x.re x.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 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (* y.im (log (/ -1 x.im))) (pow x.re 2))) (+ (* 1/2 (/ y.im (pow x.im 2))) (/ (* 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 (- (* -1 (* y.re (log (/ -1 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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -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 (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (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 (* (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 (+ (* (log (sqrt (+ (* x.re x.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 (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 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.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4))))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.re 2)) 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 2))) (* y.re (log (sqrt (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 2))) (* y.re (log (sqrt (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log (sqrt (pow x.re 2)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* 1/2 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ 1 (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 6))) (* 1/4 (/ 1 (pow (sqrt (pow x.re 2)) 4))))) (* 1/2 (/ 1 (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (sqrt (pow x.re 2))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* 1/2 (/ (pow x.im 2) (sqrt (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 3))) (* 1/2 (/ 1 (sqrt (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 5))) (* 1/8 (/ 1 (pow (sqrt (pow x.re 2)) 3))))) (* 1/2 (/ 1 (sqrt (pow x.re 2)))))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (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.re 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.re 2)) 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.re 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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.re 2))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.re 2)) 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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.re 2))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 6)))))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.re 2)))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.re 2))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.re 2))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.re 2))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 6))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.re 2)) 2))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.re 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.re 2)) 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 (sqrt (pow x.re 2)) 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 (sqrt (pow x.re 2)) y.re)))) (pow (sqrt (pow x.re 2)) 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) 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 (sqrt (pow x.re 2)) y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) y.re))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))) (pow (sqrt (pow x.re 2)) y.re)))))))))
#s(approx (* (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.re 2)) y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) y.re))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))) (pow (sqrt (pow x.re 2)) y.re))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))) (pow (sqrt (pow x.re 2)) y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (pow x.re 2)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow (sqrt (pow x.re 2)) y.re))) (pow (sqrt (pow x.re 2)) 2))) (pow (sqrt (pow x.re 2)) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow (sqrt (pow x.re 2)) y.re)) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))) (pow (sqrt (pow x.re 2)) y.re))))) (pow (sqrt (pow x.re 2)) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow (sqrt (pow x.re 2)) y.re)) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))) (pow (sqrt (pow x.re 2)) y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))) (pow (sqrt (pow x.re 2)) y.re))))))) (pow (sqrt (pow x.re 2)) y.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 2))) (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 6)))))))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (/ (+ (* 1/2 (* (pow x.re 2) y.im)) (* (pow x.im 2) (+ (* y.im (log (neg 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 (- (* -1 (* y.re (log (/ 1 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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 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 (* (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 (+ (* (log (sqrt (+ (* x.re x.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 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (log (neg (/ 1 x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (log (neg (/ 1 x.im))))) (+ (* 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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 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 (* (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 (+ (* (log (sqrt (+ (* x.re x.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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* 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 (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (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 (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (+ (* y.re (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (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 (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)) (* (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.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* (pow y.re 2) (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* 1/24 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* (pow y.re 2) (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* (pow y.re 2) (+ (* -1/720 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 6))))) (* 1/24 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4)))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/2 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow y.re 2) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/24 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow y.re 2) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 6)))) (* 1/24 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (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 (* (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 (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 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (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) #s(hole binary64 (pow y.re 2)))
#s(approx (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5)))) #s(hole binary64 (* -1/6 (pow (atan2 x.im x.re) 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(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)))) (* -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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (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 (* (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 (+ (* (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 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) #s(hole binary64 (* 1/120 (* (pow y.re 5) (pow (atan2 x.im x.re) 5)))))
#s(approx (* y.re (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) #s(hole binary64 (* (pow y.re 5) (+ (* -1/6 (/ (pow (atan2 x.im x.re) 3) (pow y.re 2))) (* 1/120 (pow (atan2 x.im x.re) 5))))))
#s(approx (* y.re (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) #s(hole binary64 (* (pow y.re 5) (+ (* -1/6 (/ (pow (atan2 x.im x.re) 3) (pow y.re 2))) (+ (* 1/120 (pow (atan2 x.im x.re) 5)) (/ (atan2 x.im x.re) (pow y.re 4)))))))
#s(approx (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)) #s(hole binary64 (* 1/120 (* (pow y.re 4) (pow (atan2 x.im x.re) 5)))))
#s(approx (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)) #s(hole binary64 (* (pow y.re 4) (+ (* -1/6 (/ (pow (atan2 x.im x.re) 3) (pow y.re 2))) (* 1/120 (pow (atan2 x.im x.re) 5))))))
#s(approx (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)) #s(hole binary64 (* (pow y.re 4) (+ (* -1/6 (/ (pow (atan2 x.im x.re) 3) (pow y.re 2))) (+ (* 1/120 (pow (atan2 x.im x.re) 5)) (/ (atan2 x.im x.re) (pow y.re 4)))))))
#s(approx (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5)))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/6 (/ (pow (atan2 x.im x.re) 3) (pow y.re 2))) (* 1/120 (pow (atan2 x.im x.re) 5))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* (pow y.re 5) (+ (* -1/120 (pow (atan2 x.im x.re) 5)) (* 1/6 (/ (pow (atan2 x.im x.re) 3) (pow y.re 2))))))))
#s(approx (* y.re (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* (pow y.re 5) (+ (* -1 (/ (atan2 x.im x.re) (pow y.re 4))) (+ (* -1/120 (pow (atan2 x.im x.re) 5)) (* 1/6 (/ (pow (atan2 x.im x.re) 3) (pow y.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.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 (+ (* -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))) (* 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 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (sin (* y.re (atan2 x.im x.re))) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (log (/ -1 x.im))) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (/ (sin (* y.re (atan2 x.im x.re))) y.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (+ (log (/ -1 x.im)) (* -1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (+ (log (/ -1 x.im)) (+ (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)) (* -1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
Outputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (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)))))))))
(/.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
#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))))))))
(/.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 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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))))))) (*.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))))))))))
(+.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)))))))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.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))))))
(*.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)))))
(log.f64 (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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)))
(log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(hypot.f64 (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 (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))))
(*.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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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))
(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 (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)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
(sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.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) (* (atan2 x.im x.re) y.re)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.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(literal 1/2 binary64)
(*.f64 (/.f64 (*.f64 x.re x.re) x.im) (/.f64 y.im x.im))
(/.f64 (neg.f64 (*.f64 (*.f64 x.re x.re) y.im)) (neg.f64 (*.f64 x.im x.im)))
(/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))
(*.f64 (*.f64 x.re x.re) y.im)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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 (*.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)))) (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 (*.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)))) (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 (*.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))))
(*.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)))
(/.f64 (+.f64 (pow.f64 (*.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)))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 (*.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)))))) (*.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)))))) (-.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (*.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)))))
(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))
(+.f64 (*.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))
(*.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 (+.f64 (pow.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 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))))) (*.f64 (*.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))))))))
(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)))))
(+.f64 (*.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)))))
#s(literal -1/6 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)
(*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))
#s(literal 1/120 binary64)
(*.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))
(pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))
(exp.f64 (*.f64 (log.f64 (atan2.f64 x.im x.re)) #s(literal 5 binary64)))
#s(literal 5 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))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.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 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (sqrt.f64 (*.f64 x.im x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (sqrt.f64 (*.f64 x.im x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3/2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 (*.f64 x.im x.im) #s(literal 5/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 x.im x.im))))))))
#s(approx (+ (* x.re x.re) (* 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 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.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 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.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 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (sqrt.f64 (*.f64 x.im x.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.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 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.im x.im))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.im x.im))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.im x.im)))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.im x.im)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.im x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (cos.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)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (*.f64 x.im 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 (sqrt.f64 (*.f64 x.im x.im)) y.re)))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (*.f64 x.im 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 (sqrt.f64 (*.f64 x.im x.im)) y.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))))))))
#s(approx (* (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 (sqrt.f64 (*.f64 x.im x.im)) y.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)) (*.f64 (*.f64 x.re x.re) (*.f64 (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 (*.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.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 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/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 (* 1/2 (/ (* (* x.re x.re) y.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 (/ (* (* x.re x.re) y.im) (* x.im x.im)) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))
#s(approx (* (* x.re x.re) y.im) (*.f64 (*.f64 x.re x.re) y.im))
#s(approx (* y.re (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (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 (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.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 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5)))) (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))))))
#s(approx (pow (atan2 x.im x.re) 3) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))
#s(approx (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))
#s(approx (* (* y.re y.re) (pow (atan2 x.im x.re) 5)) (*.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))
#s(approx (pow (atan2 x.im x.re) 5) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 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.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))) (*.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 (*.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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (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 (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.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 (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im 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)) (*.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 (+ (* (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 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 x.re x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.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.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.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)) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.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)) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.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.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.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)) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.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)) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.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)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.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)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im 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)) (*.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 (+ (* (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.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 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (sqrt.f64 (*.f64 x.re x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (sqrt.f64 (*.f64 x.re x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (sqrt.f64 (*.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 (*.f64 x.re x.re) #s(literal 3/2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 (*.f64 x.re x.re) #s(literal 5/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 x.re x.re))))))))
#s(approx x.im x.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.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 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.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 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (sqrt.f64 (*.f64 x.re x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.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 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.re x.re))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.re x.re))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.re x.re)))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.re x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.re x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.re x.re) #s(literal 3 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 (sqrt.f64 (*.f64 x.re 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 (sqrt.f64 (*.f64 x.re x.re)) y.re)))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (*.f64 x.re 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 (sqrt.f64 (*.f64 x.re x.re)) y.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))))))))
#s(approx (* (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 (sqrt.f64 (*.f64 x.re x.re)) y.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (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 (*.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)))))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))))))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (*.f64 x.im x.im) (fma.f64 y.im (log.f64 (neg.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)))) (*.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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.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)) (*.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 (+ (* (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 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (neg.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.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.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.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)) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.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)) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.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.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.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)) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.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)) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.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)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.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)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.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)) (*.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 (+ (* (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.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.im (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (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 (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.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 y.im (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 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 #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 (*.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.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/720 binary64) (*.f64 y.im (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.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 4 binary64)))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)))) (*.f64 #s(literal 1/24 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 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 (* (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 (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 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (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) (*.f64 y.re y.re))
#s(approx (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5)))) (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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 (+.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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (* 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 (+ (* (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 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (*.f64 x.im x.im) y.re)) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 5 binary64))))
#s(approx (* y.re (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (*.f64 (pow.f64 y.re #s(literal 5 binary64)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.re y.re)) (*.f64 #s(literal 1/120 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))
#s(approx (* y.re (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (*.f64 (pow.f64 y.re #s(literal 5 binary64)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/120 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (/.f64 (atan2.f64 x.im x.re) (pow.f64 y.re #s(literal 4 binary64)))))))
#s(approx (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 y.re #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))
#s(approx (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.re y.re)) (*.f64 #s(literal 1/120 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))
#s(approx (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/120 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (/.f64 (atan2.f64 x.im x.re) (pow.f64 y.re #s(literal 4 binary64)))))))
#s(approx (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5)))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.re y.re)) (*.f64 #s(literal 1/120 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.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)))) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (* y.re (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 5 binary64)) (fma.f64 #s(literal -1/120 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.re y.re)))))))
#s(approx (* y.re (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 5 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) (pow.f64 y.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/120 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 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)))) (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))) (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))) (+.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 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (fma.f64 y.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)))) (*.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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (fma.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)))) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) y.im))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 y.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 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (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))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.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 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (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 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))

eval131.0ms (1.4%)

Memory
25.2MiB live, 111.1MiB allocated; 30ms collecting garbage
Compiler

Compiled 22 676 to 4 097 computations (81.9% saved)

prune75.0ms (0.8%)

Memory
-21.3MiB live, 47.5MiB allocated; 43ms collecting garbage
Pruning

24 alts after pruning (22 fresh and 2 done)

PrunedKeptTotal
New6937700
Fresh41519
Picked325
Done000
Total70024724
Accuracy
98.1%
Counts
724 → 24
Alt Table
Click to see full alt table
StatusAccuracyProgram
19.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 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
24.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)) #s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.im))))))
21.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 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) x.im) (/.f64 y.im x.im)))))))
30.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))) #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 #s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))))))))
▶52.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))) #s(approx (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))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))
46.8%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (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))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))))
▶36.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 (+.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))))
28.9%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) 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.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
9.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.im))) 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.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 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) 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 #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)))))))
12.6%
(*.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 #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))))))
26.6%
(*.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)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
19.1%
(*.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)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
▶41.3%
(*.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))))) #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)))))
✓47.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 (hypot.f64 x.im x.re) y.re)))
▶39.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 (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 (sqrt.f64 (*.f64 x.re x.re)) y.re))))
36.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))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))))
19.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))) #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))))))))
25.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 (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) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) 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)))) (*.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))))
30.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 (exp.f64 (-.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))))))
24.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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))))))))
22.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 #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))))
25.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))) #s(approx (* y.re (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
▶16.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(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)))))
Compiler

Compiled 1 987 to 1 579 computations (20.5% saved)

series298.0ms (3.3%)

Memory
14.3MiB live, 296.3MiB allocated; 38ms collecting garbage
Counts
51 → 439
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (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))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
#s(approx (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))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))))
(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)))
(log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(*.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 (* (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 (*.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))))
(*.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)))
(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))
(*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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 (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 (sqrt.f64 (*.f64 x.re 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) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.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 (sqrt.f64 (*.f64 x.re x.re)) y.re))
(pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)
(sqrt.f64 (*.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))))) #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 (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)))))
(exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.im (atan2.f64 x.im x.re))
#s(approx (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))))
(*.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)
(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 (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 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)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4))))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.im 2)) 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 2))) (* y.re (log (sqrt (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 2))) (* y.re (log (sqrt (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log (sqrt (pow x.im 2)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* 1/2 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ 1 (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 6))) (* 1/4 (/ 1 (pow (sqrt (pow x.im 2)) 4))))) (* 1/2 (/ 1 (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (sqrt (pow x.im 2))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* 1/2 (/ (pow x.re 2) (sqrt (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 3))) (* 1/2 (/ 1 (sqrt (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 5))) (* 1/8 (/ 1 (pow (sqrt (pow x.im 2)) 3))))) (* 1/2 (/ 1 (sqrt (pow x.im 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (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)))) (* 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 (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.im 2)) 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.im 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.im 2)) 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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) (+ (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 6)))))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 2))) (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2)))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 6)))))))))))
#s(approx (* 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 (sqrt (pow x.im 2)) 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 (sqrt (pow x.im 2)) y.re)))) (pow (sqrt (pow x.im 2)) 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) 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 (sqrt (pow x.im 2)) y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) y.re))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))) (pow (sqrt (pow x.im 2)) y.re)))))))))
#s(approx (* (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)) y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) y.re))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))) (pow (sqrt (pow x.im 2)) y.re))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))) (pow (sqrt (pow x.im 2)) y.re)))))))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (pow x.im 2))) (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) 2))) (* y.re (+ (* y.re (* (log (sqrt (pow x.im 2))) (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* y.re (* (log (sqrt (pow x.im 2))) (atan2 x.im x.re))) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ (* (pow y.re 2) (atan2 x.im x.re)) (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* y.re (* (log (sqrt (pow x.im 2))) (atan2 x.im x.re))) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* (pow y.re 2) (atan2 x.im x.re)) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow y.re 2) (atan2 x.im x.re)) (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) 6))))))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (pow x.im 2))) (atan2 x.im x.re))) (atan2 x.im x.re))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) 2))) (+ (* y.re (* (log (sqrt (pow x.im 2))) (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (pow x.im 2))) (atan2 x.im x.re))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ (* y.re (atan2 x.im x.re)) (pow (sqrt (pow x.im 2)) 2))))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (pow x.im 2))) (atan2 x.im x.re))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (atan2 x.im x.re)) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.re (atan2 x.im x.re)) (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) 6))))))) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (* (log (sqrt (pow x.im 2))) (atan2 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow (sqrt (pow x.im 2)) 2))) (* (log (sqrt (pow x.im 2))) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (log (sqrt (pow x.im 2))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ (atan2 x.im x.re) (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (log (sqrt (pow x.im 2))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ (atan2 x.im x.re) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (atan2 x.im x.re) (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow (sqrt (pow x.im 2)) 6))))))))))
#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 (sqrt (pow x.im 2)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow (sqrt (pow x.im 2)) y.re))) (pow (sqrt (pow x.im 2)) 2))) (pow (sqrt (pow x.im 2)) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow (sqrt (pow x.im 2)) y.re)) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))) (pow (sqrt (pow x.im 2)) y.re))))) (pow (sqrt (pow x.im 2)) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow (sqrt (pow x.im 2)) y.re)) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))) (pow (sqrt (pow x.im 2)) y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))) (pow (sqrt (pow x.im 2)) y.re))))))) (pow (sqrt (pow x.im 2)) y.re))))
#s(approx (pow (sqrt (* x.re x.re)) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (neg (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (* -1 x.re) #s(hole binary64 (* -1 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))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 2))) (* y.im (log (sqrt (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 6))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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 (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #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 (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1 (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1 (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/720 (/ (* (pow y.re 2) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1 (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (atan2 x.im x.re))) (pow x.re 2))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.re (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (atan2 x.im x.re))) (pow x.re 2))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.re (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (atan2 x.im x.re))) (pow x.re 2))) (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (pow x.re 4))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im 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)))))))
#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 (* (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 (+ 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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #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 (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1 (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1 (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/720 (/ (* (pow y.re 2) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1 (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (atan2 x.im x.re))) (pow x.re 2))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.re (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (atan2 x.im x.re))) (pow x.re 2))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.re (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (atan2 x.im x.re))) (pow x.re 2))) (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (pow x.re 4))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im 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)))))))
#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 (* (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 (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 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.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4))))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.re 2)) 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 2))) (* y.re (log (sqrt (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 2))) (* y.re (log (sqrt (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log (sqrt (pow x.re 2)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* 1/2 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ 1 (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 6))) (* 1/4 (/ 1 (pow (sqrt (pow x.re 2)) 4))))) (* 1/2 (/ 1 (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (sqrt (pow x.re 2))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* 1/2 (/ (pow x.im 2) (sqrt (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 3))) (* 1/2 (/ 1 (sqrt (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 5))) (* 1/8 (/ 1 (pow (sqrt (pow x.re 2)) 3))))) (* 1/2 (/ 1 (sqrt (pow x.re 2)))))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (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.re 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.re 2)) 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.re 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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.re 2))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.re 2)) 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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.re 2))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 6)))))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 2))) (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2)))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 6)))))))))))
#s(approx (* (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.re 2)) 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 (sqrt (pow x.re 2)) y.re)))) (pow (sqrt (pow x.re 2)) 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) 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 (sqrt (pow x.re 2)) y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) y.re))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))) (pow (sqrt (pow x.re 2)) y.re)))))))))
#s(approx (* (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.re 2)) y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) y.re))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))) (pow (sqrt (pow x.re 2)) y.re))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))) (pow (sqrt (pow x.re 2)) y.re)))))))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (pow x.re 2))) (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) 2))) (* y.re (+ (* y.re (* (log (sqrt (pow x.re 2))) (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* y.re (* (log (sqrt (pow x.re 2))) (atan2 x.im x.re))) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ (* (pow y.re 2) (atan2 x.im x.re)) (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* y.re (* (log (sqrt (pow x.re 2))) (atan2 x.im x.re))) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* (pow y.re 2) (atan2 x.im x.re)) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow y.re 2) (atan2 x.im x.re)) (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) 6))))))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (pow x.re 2))) (atan2 x.im x.re))) (atan2 x.im x.re))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) 2))) (+ (* y.re (* (log (sqrt (pow x.re 2))) (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (pow x.re 2))) (atan2 x.im x.re))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ (* y.re (atan2 x.im x.re)) (pow (sqrt (pow x.re 2)) 2))))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (pow x.re 2))) (atan2 x.im x.re))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (atan2 x.im x.re)) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.re (atan2 x.im x.re)) (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) 6))))))) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (* (log (sqrt (pow x.re 2))) (atan2 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow (sqrt (pow x.re 2)) 2))) (* (log (sqrt (pow x.re 2))) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (log (sqrt (pow x.re 2))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ (atan2 x.im x.re) (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (log (sqrt (pow x.re 2))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (atan2 x.im x.re) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (atan2 x.im x.re) (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow (sqrt (pow x.re 2)) 6))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (pow x.re 2)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow (sqrt (pow x.re 2)) y.re))) (pow (sqrt (pow x.re 2)) 2))) (pow (sqrt (pow x.re 2)) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow (sqrt (pow x.re 2)) y.re)) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))) (pow (sqrt (pow x.re 2)) y.re))))) (pow (sqrt (pow x.re 2)) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow (sqrt (pow x.re 2)) y.re)) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))) (pow (sqrt (pow x.re 2)) y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))) (pow (sqrt (pow x.re 2)) y.re))))))) (pow (sqrt (pow x.re 2)) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 2))) (* y.im (log (sqrt (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 6))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #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 (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1 (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1 (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/720 (/ (* (pow y.re 2) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1 (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (atan2 x.im x.re))) (pow x.im 2))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.re (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (atan2 x.im x.re))) (pow x.im 2))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.re (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (atan2 x.im x.re))) (pow x.im 2))) (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (pow x.im 4))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (* (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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #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 (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1 (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1 (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/720 (/ (* (pow y.re 2) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1 (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (atan2 x.im x.re))) (pow x.im 2))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.re (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (atan2 x.im x.re))) (pow x.im 2))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.re (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (atan2 x.im x.re))) (pow x.im 2))) (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (pow x.im 4))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (* (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)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* 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 (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (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 (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (+ (* y.re (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (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 (* (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 (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (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 (pow (sqrt (* x.re x.re)) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (pow x.re 2)))))))
#s(approx (pow (sqrt (* x.re x.re)) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (pow x.re 2))) (* 1/2 (* y.re (pow (log (sqrt (pow x.re 2))) 2))))))))
#s(approx (pow (sqrt (* x.re x.re)) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (pow x.re 2))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (pow x.re 2))) 3))) (* 1/2 (pow (log (sqrt (pow x.re 2))) 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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)))) (* -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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.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 (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (* (pow y.re 2) (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (/ (atan2 x.im x.re) y.re)))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (* y.re (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (/ (atan2 x.im x.re) y.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.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 (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* -1 (/ (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 (+ (* 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 (+ (* -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))) (* 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 (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (sin (* y.re (atan2 x.im x.re))) y.im)))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (/ (sin (* y.re (atan2 x.im x.re))) y.im)))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #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:

TimeVariablePointExpression
90.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))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re 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)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (* (log (sqrt (+ (* x.im x.im) (* x.re x.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) (pow (sqrt (* x.re x.re)) y.re) (sqrt (* 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 (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (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))) (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 (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))
32.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))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re 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)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (* (log (sqrt (+ (* x.im x.im) (* x.re x.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) (pow (sqrt (* x.re x.re)) y.re) (sqrt (* 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 (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (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))) (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 (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))
31.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))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re 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)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (* (log (sqrt (+ (* x.im x.im) (* x.re x.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) (pow (sqrt (* x.re x.re)) y.re) (sqrt (* 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 (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (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))) (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 (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))
19.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))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re 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)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (* (log (sqrt (+ (* x.im x.im) (* x.re x.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) (pow (sqrt (* x.re x.re)) y.re) (sqrt (* 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 (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (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))) (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 (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))
18.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))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re 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)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (* (log (sqrt (+ (* x.im x.im) (* x.re x.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) (pow (sqrt (* x.re x.re)) y.re) (sqrt (* 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 (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (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))) (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 (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))

rewrite423.0ms (4.7%)

Memory
-34.1MiB live, 446.1MiB allocated; 71ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0252332404
0259231279
0909127336
Stop Event
1×iter-limit
1×node-limit
1×iter-limit
Counts
490 → 551
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (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))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
#s(approx (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))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))))
(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)))
(log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(*.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 (* (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 (*.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))))
(*.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)))
(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))
(*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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 (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 (sqrt.f64 (*.f64 x.re 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) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.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 (sqrt.f64 (*.f64 x.re x.re)) y.re))
(pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)
(sqrt.f64 (*.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))))) #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 (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)))))
(exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.im (atan2.f64 x.im x.re))
#s(approx (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))))
(*.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)
(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 (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 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)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4))))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.im 2)) 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 2))) (* y.re (log (sqrt (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 2))) (* y.re (log (sqrt (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log (sqrt (pow x.im 2)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* 1/2 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ 1 (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 6))) (* 1/4 (/ 1 (pow (sqrt (pow x.im 2)) 4))))) (* 1/2 (/ 1 (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (sqrt (pow x.im 2))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* 1/2 (/ (pow x.re 2) (sqrt (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 3))) (* 1/2 (/ 1 (sqrt (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 5))) (* 1/8 (/ 1 (pow (sqrt (pow x.im 2)) 3))))) (* 1/2 (/ 1 (sqrt (pow x.im 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (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)))) (* 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 (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.im 2)) 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.im 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.im 2)) 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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) (+ (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 6)))))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 2))) (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2)))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 6)))))))))))
#s(approx (* 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 (sqrt (pow x.im 2)) 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 (sqrt (pow x.im 2)) y.re)))) (pow (sqrt (pow x.im 2)) 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) 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 (sqrt (pow x.im 2)) y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) y.re))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))) (pow (sqrt (pow x.im 2)) y.re)))))))))
#s(approx (* (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)) y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) y.re))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))) (pow (sqrt (pow x.im 2)) y.re))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))) (pow (sqrt (pow x.im 2)) y.re)))))))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (pow x.im 2))) (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) 2))) (* y.re (+ (* y.re (* (log (sqrt (pow x.im 2))) (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* y.re (* (log (sqrt (pow x.im 2))) (atan2 x.im x.re))) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ (* (pow y.re 2) (atan2 x.im x.re)) (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* y.re (* (log (sqrt (pow x.im 2))) (atan2 x.im x.re))) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* (pow y.re 2) (atan2 x.im x.re)) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow y.re 2) (atan2 x.im x.re)) (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) 6))))))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (pow x.im 2))) (atan2 x.im x.re))) (atan2 x.im x.re))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) 2))) (+ (* y.re (* (log (sqrt (pow x.im 2))) (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (pow x.im 2))) (atan2 x.im x.re))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ (* y.re (atan2 x.im x.re)) (pow (sqrt (pow x.im 2)) 2))))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (pow x.im 2))) (atan2 x.im x.re))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (atan2 x.im x.re)) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.re (atan2 x.im x.re)) (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.im 2)) 6))))))) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (* (log (sqrt (pow x.im 2))) (atan2 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow (sqrt (pow x.im 2)) 2))) (* (log (sqrt (pow x.im 2))) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (log (sqrt (pow x.im 2))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ (atan2 x.im x.re) (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (log (sqrt (pow x.im 2))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ (atan2 x.im x.re) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (atan2 x.im x.re) (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow (sqrt (pow x.im 2)) 6))))))))))
#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 (sqrt (pow x.im 2)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow (sqrt (pow x.im 2)) y.re))) (pow (sqrt (pow x.im 2)) 2))) (pow (sqrt (pow x.im 2)) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow (sqrt (pow x.im 2)) y.re)) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))) (pow (sqrt (pow x.im 2)) y.re))))) (pow (sqrt (pow x.im 2)) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow (sqrt (pow x.im 2)) y.re)) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))) (pow (sqrt (pow x.im 2)) y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))) (pow (sqrt (pow x.im 2)) y.re))))))) (pow (sqrt (pow x.im 2)) y.re))))
#s(approx (pow (sqrt (* x.re x.re)) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (neg (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (* -1 x.re) #s(hole binary64 (* -1 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))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 2))) (* y.im (log (sqrt (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 6))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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 (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #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 (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1 (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1 (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/720 (/ (* (pow y.re 2) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1 (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (atan2 x.im x.re))) (pow x.re 2))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.re (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (atan2 x.im x.re))) (pow x.re 2))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.re (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (atan2 x.im x.re))) (pow x.re 2))) (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (pow x.re 4))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im 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)))))))
#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 (* (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 (+ 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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #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 (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1 (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1 (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/720 (/ (* (pow y.re 2) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1 (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (atan2 x.im x.re))) (pow x.re 2))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.re (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (atan2 x.im x.re))) (pow x.re 2))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.re (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (atan2 x.im x.re))) (pow x.re 2))) (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (pow x.re 4))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im 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)))))))
#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 (* (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 (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.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.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 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.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4))))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.re 2)) 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 2))) (* y.re (log (sqrt (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 2))) (* y.re (log (sqrt (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log (sqrt (pow x.re 2)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* 1/2 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ 1 (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 6))) (* 1/4 (/ 1 (pow (sqrt (pow x.re 2)) 4))))) (* 1/2 (/ 1 (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (sqrt (pow x.re 2))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* 1/2 (/ (pow x.im 2) (sqrt (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 3))) (* 1/2 (/ 1 (sqrt (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 5))) (* 1/8 (/ 1 (pow (sqrt (pow x.re 2)) 3))))) (* 1/2 (/ 1 (sqrt (pow x.re 2)))))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (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.re 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 6))) (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.re 2)) 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (pow x.re 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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.re 2))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.re 2)) 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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.re 2))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (* y.re (atan2 x.im x.re)))) (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 6)))))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 2))) (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2)))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 6)))))))))))
#s(approx (* (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.re 2)) 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 (sqrt (pow x.re 2)) y.re)))) (pow (sqrt (pow x.re 2)) 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) 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 (sqrt (pow x.re 2)) y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) y.re))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))) (pow (sqrt (pow x.re 2)) y.re)))))))))
#s(approx (* (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.re 2)) y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) y.re))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))) (pow (sqrt (pow x.re 2)) y.re))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))) (pow (sqrt (pow x.re 2)) y.re)))))))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (pow x.re 2))) (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) 2))) (* y.re (+ (* y.re (* (log (sqrt (pow x.re 2))) (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* y.re (* (log (sqrt (pow x.re 2))) (atan2 x.im x.re))) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ (* (pow y.re 2) (atan2 x.im x.re)) (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* y.re (* (log (sqrt (pow x.re 2))) (atan2 x.im x.re))) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* (pow y.re 2) (atan2 x.im x.re)) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow y.re 2) (atan2 x.im x.re)) (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) 6))))))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (pow x.re 2))) (atan2 x.im x.re))) (atan2 x.im x.re))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) 2))) (+ (* y.re (* (log (sqrt (pow x.re 2))) (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (pow x.re 2))) (atan2 x.im x.re))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ (* y.re (atan2 x.im x.re)) (pow (sqrt (pow x.re 2)) 2))))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (pow x.re 2))) (atan2 x.im x.re))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (atan2 x.im x.re)) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.re (atan2 x.im x.re)) (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) (* y.re (atan2 x.im x.re))) (pow (sqrt (pow x.re 2)) 6))))))) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (* (log (sqrt (pow x.re 2))) (atan2 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow (sqrt (pow x.re 2)) 2))) (* (log (sqrt (pow x.re 2))) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (log (sqrt (pow x.re 2))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ (atan2 x.im x.re) (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (log (sqrt (pow x.re 2))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (atan2 x.im x.re) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (atan2 x.im x.re) (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow (sqrt (pow x.re 2)) 6))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (pow x.re 2)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow (sqrt (pow x.re 2)) y.re))) (pow (sqrt (pow x.re 2)) 2))) (pow (sqrt (pow x.re 2)) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow (sqrt (pow x.re 2)) y.re)) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))) (pow (sqrt (pow x.re 2)) y.re))))) (pow (sqrt (pow x.re 2)) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow (sqrt (pow x.re 2)) y.re)) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))) (pow (sqrt (pow x.re 2)) y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))) (pow (sqrt (pow x.re 2)) y.re))))))) (pow (sqrt (pow x.re 2)) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 2))) (* y.im (log (sqrt (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 6))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #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 (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1 (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1 (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/720 (/ (* (pow y.re 2) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1 (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (atan2 x.im x.re))) (pow x.im 2))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.re (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (atan2 x.im x.re))) (pow x.im 2))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.re (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (atan2 x.im x.re))) (pow x.im 2))) (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (pow x.im 4))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (* (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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #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 (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1 (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1 (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/720 (/ (* (pow y.re 2) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* (pow y.re 2) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1 (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (atan2 x.im x.re))) (pow x.im 2))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.re (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (atan2 x.im x.re))) (pow x.im 2))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.re (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (atan2 x.im x.re))) (pow x.im 2))) (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (pow x.im 4))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (* (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)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* 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 (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (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 (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (+ (* y.re (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (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 (* (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 (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (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 (pow (sqrt (* x.re x.re)) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (pow x.re 2)))))))
#s(approx (pow (sqrt (* x.re x.re)) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (pow x.re 2))) (* 1/2 (* y.re (pow (log (sqrt (pow x.re 2))) 2))))))))
#s(approx (pow (sqrt (* x.re x.re)) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (pow x.re 2))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (pow x.re 2))) 3))) (* 1/2 (pow (log (sqrt (pow x.re 2))) 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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)))) (* -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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.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 (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) #s(hole binary64 (* (pow y.re 2) (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (/ (atan2 x.im x.re) y.re)))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (* y.re (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (/ (atan2 x.im x.re) y.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.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 (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* -1 (/ (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 (+ (* 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 (+ (* -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))) (* 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 (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (sin (* y.re (atan2 x.im x.re))) y.im)))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (/ (sin (* y.re (atan2 x.im x.re))) y.im)))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) #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))) #s(approx (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))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))
(/.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 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.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 x.re (fabs.f64 x.im))
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re x.im)
(/.f64 (+.f64 (pow.f64 (fabs.f64 x.re) #s(literal 6 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 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im))
(fma.f64 x.re x.re (*.f64 x.im x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 (fabs.f64 x.re) #s(literal 2 binary64))
(pow.f64 (*.f64 x.re x.re) #s(literal 1 binary64))
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (fabs.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
#s(approx (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))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))))
(/.f64 (+.f64 (pow.f64 (*.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))) (*.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))) (-.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 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))) (*.f64 y.re (atan2.f64 x.im x.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)))
(+.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)))
(log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(hypot.f64 (fabs.f64 x.im) (neg.f64 x.re))
(hypot.f64 (fabs.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (fabs.f64 x.im) x.re)
(hypot.f64 (neg.f64 x.im) (neg.f64 x.re))
(hypot.f64 (neg.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (neg.f64 x.im) x.re)
(hypot.f64 x.im (neg.f64 x.re))
(hypot.f64 x.im (fabs.f64 x.re))
(hypot.f64 x.im x.re)
(/.f64 (+.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal 6 binary64))) (fma.f64 (*.f64 x.im x.im) (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re))
(fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
(*.f64 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 (* (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 (*.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))))
(*.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)))
(/.f64 (+.f64 (pow.f64 (*.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))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 (*.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))) (*.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))) (-.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (*.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)))))
(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))
(+.f64 (*.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))
(*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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 (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 (fabs.f64 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) (pow.f64 (fabs.f64 x.re) y.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 (fabs.f64 x.re) y.re))
(pow.f64 (fabs.f64 x.re) y.re)
(pow.f64 (*.f64 x.re x.re) (/.f64 y.re #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.re)) y.re))
(*.f64 (sqrt.f64 x.re) (sqrt.f64 x.re))
(pow.f64 (*.f64 x.re x.re) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 x.re x.re))
(fabs.f64 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))))) #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 (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)))))
(/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (cosh.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.im (atan2.f64 x.im x.re))
#s(approx (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))))
(*.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 (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)
(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 (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 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im 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 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.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 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (sqrt.f64 (*.f64 x.im x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (sqrt.f64 (*.f64 x.im x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3/2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 (*.f64 x.im x.im) #s(literal 5/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 x.im x.im))))))))
#s(approx (+ (* x.re x.re) (* 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 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.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 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.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 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (sqrt.f64 (*.f64 x.im x.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.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 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.im x.im))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im))))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))))))))
#s(approx (* 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 (sqrt.f64 (*.f64 x.im 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 (sqrt.f64 (*.f64 x.im x.im)) y.re)))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (*.f64 x.im 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 (sqrt.f64 (*.f64 x.im x.im)) y.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))))))))
#s(approx (* (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 (sqrt.f64 (*.f64 x.im x.im)) y.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)) (*.f64 (*.f64 x.re x.re) (*.f64 (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 (*.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))))))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 y.re (fma.f64 y.re (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (atan2.f64 x.im x.re)) (atan2.f64 x.im x.re))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.re (fma.f64 y.re (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (atan2.f64 x.im x.re)) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (fma.f64 y.re (fma.f64 y.re (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (atan2.f64 x.im x.re)) (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re)) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (fma.f64 y.re (fma.f64 y.re (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (atan2.f64 x.im x.re)) (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re)) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re)) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (fma.f64 y.re (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (atan2.f64 x.im x.re)) (atan2.f64 x.im x.re)))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (fma.f64 y.re (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (atan2.f64 x.im x.re)) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (fma.f64 y.re (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (atan2.f64 x.im x.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (fma.f64 y.re (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (atan2.f64 x.im x.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))) (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (atan2.f64 x.im x.re)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (atan2.f64 x.im x.re)) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (fma.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (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) (atan2.f64 x.im x.re)) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (atan2.f64 x.im x.re) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (fma.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (atan2.f64 x.im x.re) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (atan2.f64 x.im x.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (atan2.f64 x.im x.re)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))))))
#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 (sqrt.f64 (*.f64 x.im x.im)) y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)))
#s(approx (pow (sqrt (* x.re x.re)) y.re) (pow.f64 x.re y.re))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (neg (* y.im (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* -1 x.re) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (sqrt.f64 (*.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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))) (*.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 (*.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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (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 (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (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 (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (neg.f64 (log.f64 x.re)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (neg.f64 (log.f64 x.re)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (neg.f64 (log.f64 x.re)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) (*.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)))) (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 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (neg.f64 (log.f64 x.re)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (neg.f64 (log.f64 x.re)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (neg.f64 (log.f64 x.re)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (neg.f64 (log.f64 x.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.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (neg.f64 (log.f64 x.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.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (*.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)))) (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.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (atan2.f64 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (atan2.f64 x.im x.re)) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (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) (atan2.f64 x.im x.re)) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.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)))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (atan2.f64 x.im x.re)) (*.f64 x.re x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (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 (* (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 (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) (*.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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.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.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.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)) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.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)) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (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 (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) (*.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)))) (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 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.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.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.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.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (*.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)))) (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.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (atan2.f64 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (atan2.f64 x.im x.re)) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (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) (atan2.f64 x.im x.re)) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.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)))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (atan2.f64 x.im x.re)) (*.f64 x.re x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (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 (* (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 (fabs.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (fabs.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 (fabs.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (fabs.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 (fabs.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (fabs.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 (fabs.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (fabs.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 (fabs.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (fabs.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 (fabs.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (fabs.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 (fabs.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (fabs.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 (fabs.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (fabs.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (fabs.f64 x.re) #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (fabs.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (fabs.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (fabs.f64 x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (fabs.f64 x.re) #s(literal 4 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (fabs.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 (fabs.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (fabs.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 (fabs.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (fabs.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 (fabs.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (fabs.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 (fabs.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (fabs.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 (fabs.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (fabs.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 (fabs.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (fabs.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (fabs.f64 x.re) #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (fabs.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (fabs.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (fabs.f64 x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (fabs.f64 x.re) #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (fabs.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 (fabs.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (fabs.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 (fabs.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (fabs.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 (fabs.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (fabs.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (fabs.f64 x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (fabs.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 (fabs.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 (fabs.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (fabs.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 (fabs.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (fabs.f64 x.re) #s(literal 4 binary64))))))) (*.f64 x.re x.re)) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (fabs.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (fabs.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 (fabs.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 (fabs.f64 x.re) #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (fabs.f64 x.re) #s(literal 6 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (fabs.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 (fabs.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (fabs.f64 x.re) #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (fabs.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 (fabs.f64 x.re) #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (fabs.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 (fabs.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 (fabs.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 (fabs.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 (fabs.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 (fabs.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 (fabs.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (fabs.f64 x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (fabs.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 (fabs.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 (fabs.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 (fabs.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (fabs.f64 x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (fabs.f64 x.re) #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (fabs.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 (fabs.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 (fabs.f64 x.re) #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (fabs.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 (fabs.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 (fabs.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 (fabs.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 (fabs.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 (fabs.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 (fabs.f64 x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 (fabs.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 (fabs.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 (fabs.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 (fabs.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 (fabs.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 (fabs.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 (fabs.f64 x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 (fabs.f64 x.re) #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (fabs.f64 x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (fabs.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 (fabs.f64 x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 (fabs.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 (fabs.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 (fabs.f64 x.re) #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (fabs.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))) (fabs.f64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (fabs.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (fabs.f64 x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (fabs.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (fabs.f64 x.re) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (fabs.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 (fabs.f64 x.re) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (fabs.f64 x.re) (*.f64 x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (fabs.f64 x.re)))))))
#s(approx x.im x.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 (fabs.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 (fabs.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 (fabs.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 (fabs.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 (fabs.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 (fabs.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (fabs.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 (fabs.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (fabs.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 (fabs.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 (fabs.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 (fabs.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (fabs.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 (fabs.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (fabs.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 (fabs.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (fabs.f64 x.re) #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 (fabs.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 (fabs.f64 x.re) #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (fabs.f64 x.re) #s(literal 6 binary64)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (fabs.f64 x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.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 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (fabs.f64 x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (fabs.f64 x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (fabs.f64 x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (fabs.f64 x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (fabs.f64 x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (fabs.f64 x.re) #s(literal 6 binary64)))))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 (fabs.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.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 (fabs.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 (fabs.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 (fabs.f64 x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 (fabs.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 (fabs.f64 x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 (fabs.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 (fabs.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 (fabs.f64 x.re) y.re)))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (fabs.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 (fabs.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 (fabs.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 (fabs.f64 x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (fabs.f64 x.re) #s(literal 4 binary64))))) (pow.f64 (fabs.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 (fabs.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 (fabs.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 (fabs.f64 x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (fabs.f64 x.re) #s(literal 4 binary64))))) (pow.f64 (fabs.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 (fabs.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 (fabs.f64 x.re) #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (fabs.f64 x.re) #s(literal 6 binary64)))))) (pow.f64 (fabs.f64 x.re) y.re))))))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 y.re (fma.f64 y.re (*.f64 (log.f64 (fabs.f64 x.re)) (atan2.f64 x.im x.re)) (atan2.f64 x.im x.re))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 y.re (fma.f64 y.re (*.f64 (log.f64 (fabs.f64 x.re)) (atan2.f64 x.im x.re)) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (fma.f64 y.re (fma.f64 y.re (*.f64 (log.f64 (fabs.f64 x.re)) (atan2.f64 x.im x.re)) (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (pow.f64 (fabs.f64 x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re)) (*.f64 x.re x.re)))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (fma.f64 y.re (fma.f64 y.re (*.f64 (log.f64 (fabs.f64 x.re)) (atan2.f64 x.im x.re)) (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y.re 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 (*.f64 y.re y.re) (atan2.f64 x.im x.re)) (pow.f64 (fabs.f64 x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (pow.f64 (fabs.f64 x.re) #s(literal 6 binary64))))))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (fma.f64 y.re (*.f64 (log.f64 (fabs.f64 x.re)) (atan2.f64 x.im x.re)) (atan2.f64 x.im x.re)))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (fma.f64 y.re (*.f64 (log.f64 (fabs.f64 x.re)) (atan2.f64 x.im x.re)) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (fma.f64 y.re (*.f64 (log.f64 (fabs.f64 x.re)) (atan2.f64 x.im x.re)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (fabs.f64 x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 x.re x.re)))) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (fma.f64 y.re (*.f64 (log.f64 (fabs.f64 x.re)) (atan2.f64 x.im x.re)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (pow.f64 (fabs.f64 x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (fabs.f64 x.re) #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (fabs.f64 x.re)) (atan2.f64 x.im x.re)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (atan2.f64 x.im x.re)) (*.f64 x.re x.re)) (*.f64 (log.f64 (fabs.f64 x.re)) (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (fma.f64 (log.f64 (fabs.f64 x.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) (atan2.f64 x.im x.re)) (pow.f64 (fabs.f64 x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (atan2.f64 x.im x.re) (*.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (fma.f64 (log.f64 (fabs.f64 x.re)) (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (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 (atan2.f64 x.im x.re) (pow.f64 (fabs.f64 x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (atan2.f64 x.im x.re)) (pow.f64 (fabs.f64 x.re) #s(literal 6 binary64))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (fabs.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 (fabs.f64 x.re) y.re))) (*.f64 x.re x.re)) (pow.f64 (fabs.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 (fabs.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 (fabs.f64 x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (fabs.f64 x.re) #s(literal 4 binary64))))) (pow.f64 (fabs.f64 x.re) y.re)))) (pow.f64 (fabs.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 (fabs.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 (fabs.f64 x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 (fabs.f64 x.re) #s(literal 4 binary64))))) (pow.f64 (fabs.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 (fabs.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 (fabs.f64 x.re) #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (fabs.f64 x.re) #s(literal 6 binary64)))))) (pow.f64 (fabs.f64 x.re) y.re)))))) (pow.f64 (fabs.f64 x.re) y.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 (fabs.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 (fabs.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 (fabs.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 (fabs.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 (fabs.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 (fabs.f64 x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 (fabs.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 (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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (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 (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) (*.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)))) (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 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (*.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)))) (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.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (atan2.f64 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (atan2.f64 x.im x.re)) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (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) (atan2.f64 x.im x.re)) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.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)))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (atan2.f64 x.im x.re)) (*.f64 x.im x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (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 (* (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 (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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.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.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.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)) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.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)) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (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 (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) (*.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)))) (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 (*.f64 y.re y.re) (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (*.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)))) (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.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (atan2.f64 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (atan2.f64 x.im x.re)) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (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) (atan2.f64 x.im x.re)) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.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)))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (atan2.f64 x.im x.re)) (*.f64 x.im x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (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 (* (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 (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 (*.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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.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.im (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (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 (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.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 y.im (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 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))) (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 (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.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))) (*.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 (pow (sqrt (* x.re x.re)) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (fabs.f64 x.re)))))
#s(approx (pow (sqrt (* x.re x.re)) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (fabs.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (log.f64 (fabs.f64 x.re)) (log.f64 (fabs.f64 x.re)))))))))
#s(approx (pow (sqrt (* x.re x.re)) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (fabs.f64 x.re)) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 (fabs.f64 x.re)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (fabs.f64 x.re)) (log.f64 (fabs.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 (*.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 (+.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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (*.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 (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (atan2.f64 x.im x.re))))
#s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (atan2.f64 x.im x.re) (/.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (*.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))))
#s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (*.f64 y.re (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (atan2.f64 x.im x.re) (/.f64 (atan2.f64 x.im 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 (- (* (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 (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re 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 (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 (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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))) (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))) (+.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 (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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 (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (fma.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)))) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) y.im))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (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))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) y.im))))))
#s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.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))))))

eval192.0ms (2.1%)

Memory
44.1MiB live, 171.9MiB allocated; 35ms collecting garbage
Compiler

Compiled 18 531 to 4 027 computations (78.3% saved)

prune106.0ms (1.2%)

Memory
-25.4MiB live, 162.5MiB allocated; 42ms collecting garbage
Pruning

31 alts after pruning (27 fresh and 4 done)

PrunedKeptTotal
New54315558
Fresh51217
Picked325
Done022
Total55131582
Accuracy
98.1%
Counts
582 → 31
Alt Table
Click to see full alt table
StatusAccuracyProgram
19.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 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
21.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 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) x.im) (/.f64 y.im x.im)))))))
46.8%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (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))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))))
43.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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
29.1%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (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))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
28.9%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) 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.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
9.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.im))) 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.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 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) 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 #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)))))))
50.1%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (fabs.f64 x.re))) 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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))
26.6%
(*.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)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
19.1%
(*.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)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
✓41.3%
(*.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))))) #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)))))
16.1%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))))) #s(approx (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)))))
✓47.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 (hypot.f64 x.im x.re) y.re)))
✓39.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 (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 (sqrt.f64 (*.f64 x.re x.re)) y.re))))
36.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))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))))
39.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) (pow.f64 (fabs.f64 x.re) y.re))))
19.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))) #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))))))))
30.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 (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(approx (pow (sqrt (* x.re x.re)) y.re) (pow.f64 x.re y.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)))) (*.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(approx (pow (sqrt (* x.re x.re)) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (fabs.f64 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)))) (*.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))))
67.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 (fabs.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (fabs.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
24.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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))))))))
22.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 #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))))
25.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))) #s(approx (* y.re (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
19.3%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
20.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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (fabs.f64 x.re)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
12.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(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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))))
11.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(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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (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 #s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (*.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)))))))
17.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 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (atan2.f64 x.im x.re) (/.f64 (atan2.f64 x.im x.re) y.re))))))
12.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)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (atan2.f64 x.im x.re))))))
Compiler

Compiled 2 717 to 1 573 computations (42.1% saved)

regimes94.0ms (1%)

Memory
34.6MiB live, 178.0MiB allocated; 17ms collecting garbage
Counts
61 → 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)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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)))) #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 #s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (*.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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (fabs.f64 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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (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 (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (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)))) #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)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (atan2.f64 x.im x.re) (/.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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 (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 5 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))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (pow (sqrt (* x.re x.re)) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (fabs.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 (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(approx (pow (sqrt (* x.re x.re)) y.re) (pow.f64 x.re y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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) (pow.f64 (fabs.f64 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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))))) #s(approx (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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(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)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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))))))))
(*.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))))) #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)))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (fabs.f64 x.re))) 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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (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 (log.f64 (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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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 (exp.f64 (-.f64 (*.f64 (log.f64 (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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (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)) #s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.im))))))
(*.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)) (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 (log.f64 (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)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (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)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) x.im) (/.f64 y.im x.im)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (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))) #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (fabs.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (fabs.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 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (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 #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 #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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)))) (*.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 (exp.f64 (-.f64 (*.f64 (log.f64 (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 (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (-.f64 #s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.im))) (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 (+.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)))) (*.f64 #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)))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
(*.f64 (exp.f64 (-.f64 #s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.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))))
(*.f64 (exp.f64 (-.f64 #s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.im))) (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.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)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (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.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) x.im) (/.f64 y.im x.im)) (*.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.re (atan2.f64 x.im x.re))) (*.f64 y.im #s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (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)))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (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 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (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 #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))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (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.im))) 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.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 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) 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 #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 (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 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sqrt.f64 (*.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))))))))))
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.im))) 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.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 (fabs.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (fabs.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 (exp.f64 (-.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))))))
Calls

5 calls:

24.0ms
y.im
19.0ms
y.re
17.0ms
x.re
16.0ms
x.im
12.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
AccuracySegmentsBranch
75.3%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))))
71.5%3x.re
79.6%3x.im
75.7%3y.re
67.2%1y.im
Compiler

Compiled 29 to 35 computations (-20.7% saved)

regimes30.0ms (0.3%)

Memory
-32.8MiB live, 65.1MiB allocated; 8ms collecting garbage
Counts
42 → 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)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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)))) #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 #s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (*.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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (fabs.f64 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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (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 (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (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)))) #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)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (atan2.f64 x.im x.re) (/.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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 (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 5 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))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (pow (sqrt (* x.re x.re)) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (fabs.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 (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(approx (pow (sqrt (* x.re x.re)) y.re) (pow.f64 x.re y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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) (pow.f64 (fabs.f64 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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))))) #s(approx (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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(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)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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))))))))
(*.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))))) #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)))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (fabs.f64 x.re))) 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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (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 (log.f64 (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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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 (exp.f64 (-.f64 (*.f64 (log.f64 (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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (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)) #s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.im))))))
(*.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)) (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 (log.f64 (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)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (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)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) x.im) (/.f64 y.im x.im)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (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))) #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (fabs.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (fabs.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 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (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 #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 #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))))))
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.im))) 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.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 (fabs.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (fabs.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (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 (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
Calls

2 calls:

14.0ms
x.im
12.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
AccuracySegmentsBranch
75.4%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))))
75.8%3x.im
Compiler

Compiled 26 to 23 computations (11.5% saved)

regimes76.0ms (0.8%)

Memory
11.2MiB live, 56.2MiB allocated; 3ms collecting garbage
Counts
38 → 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)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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)))) #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 #s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (*.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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (fabs.f64 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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (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 (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (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)))) #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)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (atan2.f64 x.im x.re) (/.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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 (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 5 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))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (pow (sqrt (* x.re x.re)) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (fabs.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 (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(approx (pow (sqrt (* x.re x.re)) y.re) (pow.f64 x.re y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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) (pow.f64 (fabs.f64 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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))))) #s(approx (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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(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)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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))))))))
(*.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))))) #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)))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (fabs.f64 x.re))) 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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (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 (log.f64 (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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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 (exp.f64 (-.f64 (*.f64 (log.f64 (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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (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)) #s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.im))))))
(*.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)) (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 (log.f64 (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)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (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)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) x.im) (/.f64 y.im x.im)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (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))) #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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (fabs.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (fabs.f64 x.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)))) (*.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 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (fabs.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (fabs.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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))))
Calls

2 calls:

62.0ms
y.re
11.0ms
x.im
Results
AccuracySegmentsBranch
75.7%3y.re
69.8%2x.im
Compiler

Compiled 2 to 8 computations (-300% saved)

regimes101.0ms (1.1%)

Memory
39.5MiB live, 122.4MiB allocated; 26ms collecting garbage
Counts
37 → 5
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)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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)))) #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 #s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (*.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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (fabs.f64 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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (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 (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (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)))) #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)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (atan2.f64 x.im x.re) (/.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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 (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 5 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))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (pow (sqrt (* x.re x.re)) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (fabs.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 (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(approx (pow (sqrt (* x.re x.re)) y.re) (pow.f64 x.re y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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) (pow.f64 (fabs.f64 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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))))) #s(approx (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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(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)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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))))))))
(*.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))))) #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)))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (fabs.f64 x.re))) 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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (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 (log.f64 (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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(approx (+ (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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 (exp.f64 (-.f64 (*.f64 (log.f64 (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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (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)) #s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.im))))))
(*.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)) (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 (log.f64 (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)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (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)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) x.im) (/.f64 y.im x.im)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (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))) #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)))))
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 (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(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 (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)))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (fabs.f64 x.re))) 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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))
(*.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))))) #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)))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))))
Calls

5 calls:

48.0ms
y.re
20.0ms
x.re
10.0ms
x.im
10.0ms
y.im
9.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
AccuracySegmentsBranch
66.3%5y.im
63.9%3x.im
61.1%3x.re
65.4%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))))
70.5%5y.re
Compiler

Compiled 29 to 35 computations (-20.7% saved)

regimes125.0ms (1.4%)

Memory
-56.8MiB live, 13.1MiB allocated; 171ms collecting garbage
Counts
25 → 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)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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)))) #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 #s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (*.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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (fabs.f64 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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (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 (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (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)))) #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)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (atan2.f64 x.im x.re) (/.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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 (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 5 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))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (pow (sqrt (* x.re x.re)) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (fabs.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 (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(approx (pow (sqrt (* x.re x.re)) y.re) (pow.f64 x.re y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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) (pow.f64 (fabs.f64 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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))))) #s(approx (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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(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)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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))))))))
(*.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))))) #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)))))
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 (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(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 (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)))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))))
Calls

1 calls:

122.0ms
y.re
Results
AccuracySegmentsBranch
67.1%3y.re
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes45.0ms (0.5%)

Memory
11.2MiB live, 64.5MiB allocated; 16ms 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)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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)))) #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 #s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (*.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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (fabs.f64 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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (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 (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (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)))) #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)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (atan2.f64 x.im x.re) (/.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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 (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 5 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))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (pow (sqrt (* x.re x.re)) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (fabs.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 (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(approx (pow (sqrt (* x.re x.re)) y.re) (pow.f64 x.re y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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) (pow.f64 (fabs.f64 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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))))) #s(approx (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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(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)) #s(approx (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (* x.re x.re) y.im) (* x.im x.im))) (* y.re (atan2 x.im x.re)))) (*.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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (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))))))))
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 (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 (exp.f64 (-.f64 (*.f64 (log.f64 (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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))))
Calls

5 calls:

15.0ms
y.im
7.0ms
x.im
7.0ms
x.re
7.0ms
y.re
6.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
AccuracySegmentsBranch
54.2%3x.re
59.0%3y.im
55.4%3x.im
57.8%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))))
58.1%2y.re
Compiler

Compiled 29 to 35 computations (-20.7% saved)

regimes28.0ms (0.3%)

Memory
3.8MiB live, 49.0MiB allocated; 3ms collecting garbage
Counts
20 → 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)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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)))) #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 #s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (*.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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (fabs.f64 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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (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 (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (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)))) #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)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (atan2.f64 x.im x.re) (/.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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 (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 5 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))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (pow (sqrt (* x.re x.re)) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (fabs.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 (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(approx (pow (sqrt (* x.re x.re)) y.re) (pow.f64 x.re y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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) (pow.f64 (fabs.f64 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))) #s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.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) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))))) #s(approx (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
Outputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (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))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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) (pow.f64 (fabs.f64 x.re) y.re))))
Calls

4 calls:

9.0ms
y.im
6.0ms
x.im
6.0ms
y.re
5.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (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
AccuracySegmentsBranch
53.8%3x.im
54.7%3y.im
53.4%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))))
52.5%2y.re
Compiler

Compiled 28 to 31 computations (-10.7% saved)

regimes25.0ms (0.3%)

Memory
-0.7MiB live, 46.2MiB allocated; 2ms collecting garbage
Counts
14 → 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)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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)))) #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 #s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (*.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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (fabs.f64 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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (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 (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (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)))) #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)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (atan2.f64 x.im x.re) (/.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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 (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 5 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))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (pow (sqrt (* x.re x.re)) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (fabs.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 (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(approx (pow (sqrt (* x.re x.re)) y.re) (pow.f64 x.re y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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) (pow.f64 (fabs.f64 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 (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 (fabs.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))) #s(approx (* y.re (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
Calls

5 calls:

6.0ms
x.re
5.0ms
x.im
5.0ms
y.im
4.0ms
y.re
4.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (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
AccuracySegmentsBranch
42.9%2x.im
39.9%1y.re
39.9%1x.re
43.4%2y.im
39.9%1(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (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 29 to 35 computations (-20.7% saved)

regimes26.0ms (0.3%)

Memory
-14.9MiB live, 37.2MiB allocated; 6ms collecting garbage
Counts
13 → 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)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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)))) #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 #s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (*.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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (fabs.f64 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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (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 (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (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)))) #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)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (atan2.f64 x.im x.re) (/.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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 (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 5 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))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (pow (sqrt (* x.re x.re)) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (fabs.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 (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(approx (pow (sqrt (* x.re x.re)) y.re) (pow.f64 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 (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(approx (pow (sqrt (* x.re x.re)) y.re) (pow.f64 x.re y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* 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 (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 5 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))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (pow (sqrt (* x.re x.re)) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (fabs.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 (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(approx (pow (sqrt (* x.re x.re)) y.re) (pow.f64 x.re y.re)))))
Calls

5 calls:

7.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))))
5.0ms
y.re
4.0ms
x.re
4.0ms
x.im
4.0ms
y.im
Results
AccuracySegmentsBranch
40.3%4y.re
34.1%3(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (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))))
30.2%1x.re
37.7%3x.im
37.5%3y.im
Compiler

Compiled 29 to 35 computations (-20.7% saved)

regimes14.0ms (0.2%)

Memory
22.9MiB live, 22.9MiB allocated; 0ms collecting garbage
Counts
12 → 3
Calls
Call 1
Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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)))) #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 #s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (*.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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (fabs.f64 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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (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 (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (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)))) #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)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (atan2.f64 x.im x.re) (/.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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 (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 5 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))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(approx (pow (sqrt (* x.re x.re)) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (fabs.f64 x.re))))))))
Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* 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 (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 5 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 #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 (+ (* (* y.re y.re) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (* y.re y.re) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
Calls

3 calls:

4.0ms
y.re
4.0ms
x.im
4.0ms
y.im
Results
AccuracySegmentsBranch
35.1%3y.im
27.4%2x.im
34.0%4y.re
Compiler

Compiled 3 to 12 computations (-300% saved)

regimes19.0ms (0.2%)

Memory
-14.9MiB live, 31.7MiB allocated; 2ms collecting garbage
Counts
10 → 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)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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)))) #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 #s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (*.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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (fabs.f64 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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (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 (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (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)))) #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)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (atan2.f64 x.im x.re) (/.f64 (atan2.f64 x.im x.re) y.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.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))))
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 (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
Calls

5 calls:

4.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (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))))
4.0ms
x.im
4.0ms
x.re
3.0ms
y.im
3.0ms
y.re
Results
AccuracySegmentsBranch
24.6%2x.im
26.0%2y.re
22.9%1x.re
25.4%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))))
27.1%3y.im
Compiler

Compiled 29 to 35 computations (-20.7% saved)

regimes13.0ms (0.1%)

Memory
26.3MiB live, 26.3MiB allocated; 0ms collecting garbage
Counts
9 → 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)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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)))) #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 #s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (*.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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (fabs.f64 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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (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 (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (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)))) #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)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (atan2.f64 x.im x.re) (/.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)))) (*.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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
Calls

4 calls:

3.0ms
x.im
3.0ms
y.re
3.0ms
y.im
3.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (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
AccuracySegmentsBranch
23.6%2x.im
22.7%2(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (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))))
23.6%3y.im
24.5%2y.re
Compiler

Compiled 28 to 31 computations (-10.7% saved)

regimes6.0ms (0.1%)

Memory
-37.5MiB live, 9.1MiB allocated; 2ms collecting garbage
Counts
5 → 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)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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)))) #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 #s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (*.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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (fabs.f64 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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (atan2.f64 x.im x.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 (fma.f64 y.re #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (fabs.f64 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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (sqrt.f64 (*.f64 x.im x.im))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
Calls

2 calls:

3.0ms
y.re
2.0ms
x.re
Results
AccuracySegmentsBranch
22.6%2x.re
24.4%2y.re
Compiler

Compiled 2 to 8 computations (-300% saved)

regimes4.0ms (0%)

Memory
9.0MiB live, 9.0MiB allocated; 0ms collecting garbage
Counts
4 → 2
Calls
Call 1
Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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)))) #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 #s(approx (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re)) (*.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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (fabs.f64 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)))) #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 #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.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 (fma.f64 y.re #s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re)) (*.f64 (log.f64 (fabs.f64 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)))) #s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (* y.re (+ (* y.re (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (atan2 x.im x.re))) (atan2 x.im x.re))) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (atan2.f64 x.im x.re))))))
Calls

2 calls:

2.0ms
y.re
2.0ms
x.im
Results
AccuracySegmentsBranch
20.3%1x.im
23.2%2y.re
Compiler

Compiled 2 to 8 computations (-300% saved)

regimes7.0ms (0.1%)

Memory
15.6MiB live, 15.6MiB allocated; 0ms collecting garbage
Accuracy

Total -0.2b remaining (-0.4%)

Threshold costs -0.2b (-0.4%)

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

5 calls:

1.0ms
x.re
1.0ms
y.re
1.0ms
y.im
1.0ms
x.im
1.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (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
AccuracySegmentsBranch
12.3%1x.im
12.3%1y.im
12.3%1x.re
12.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))))
12.3%1y.re
Compiler

Compiled 29 to 35 computations (-20.7% saved)

bsearch72.0ms (0.8%)

Memory
-0.1MiB live, 95.1MiB allocated; 6ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
34.0ms
1.2180835966854604e-10
0.0567670320942474
32.0ms
-2.1526598557410024e+52
-1.52781976416637e+48
Samples
31.0ms97×1valid
20.0ms174×0valid
1.0ms1×2valid
Compiler

Compiled 1 339 to 1 058 computations (21% saved)

Precisions
Click to see histograms. Total time spent on operations: 43.0ms
ival-mult!: 9.0ms (21.2% of total)
ival-hypot: 8.0ms (18.8% of total)
ival-sin: 7.0ms (16.5% of total)
ival-log: 6.0ms (14.1% of total)
adjust: 4.0ms (9.4% of total)
ival-atan2: 4.0ms (9.4% of total)
ival-exp: 3.0ms (7.1% of total)
ival-add!: 1.0ms (2.4% of total)
ival-sub!: 1.0ms (2.4% of total)

bsearch37.0ms (0.4%)

Memory
8.5MiB live, 55.0MiB allocated; 3ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
33.0ms
7.57453854910001e+155
4.483685766973377e+162
1.0ms
-2.1526598557410024e+52
-1.52781976416637e+48
Samples
13.0ms37×1valid
11.0ms105×0valid
2.0ms2×2valid
Compiler

Compiled 1 294 to 1 031 computations (20.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 21.0ms
ival-hypot: 4.0ms (18.7% of total)
ival-mult!: 4.0ms (18.7% of total)
ival-atan2: 3.0ms (14% of total)
ival-log: 3.0ms (14% of total)
ival-sin: 3.0ms (14% of total)
adjust: 2.0ms (9.3% of total)
ival-exp: 1.0ms (4.7% of total)
ival-add!: 0.0ms (0% of total)
ival-sub!: 0.0ms (0% of total)

bsearch73.0ms (0.8%)

Memory
-30.4MiB live, 60.5MiB allocated; 9ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
29.0ms
1.711715853864889
3864132.9373172265
23.0ms
-4.242322576393237e+26
-1.611925786478821e+25
Samples
23.0ms202×0valid
18.0ms54×1valid
Compiler

Compiled 1 332 to 1 107 computations (16.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 33.0ms
ival-mult!: 7.0ms (21.1% of total)
ival-sin: 7.0ms (21.1% of total)
ival-hypot: 6.0ms (18.1% of total)
ival-log: 5.0ms (15% of total)
ival-atan2: 3.0ms (9% of total)
adjust: 2.0ms (6% of total)
ival-exp: 2.0ms (6% of total)
ival-add!: 1.0ms (3% of total)
ival-sub!: 1.0ms (3% of total)

bsearch142.0ms (1.6%)

Memory
4.0MiB live, 97.4MiB allocated; 19ms collecting garbage
Algorithm
4×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
24.0ms
1.711715853864889
3864132.9373172265
15.0ms
1.1757930325311627e-184
4.5080409433263435e-184
30.0ms
-5.896147613179903e-195
-1.582140603107331e-196
25.0ms
-35.20211910506025
-0.02455112162381432
Samples
50.0ms368×0valid
24.0ms80×1valid
Compiler

Compiled 2 312 to 1 928 computations (16.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 60.0ms
ival-exp: 13.0ms (21.5% of total)
ival-mult!: 11.0ms (18.2% of total)
ival-hypot: 10.0ms (16.5% of total)
ival-log: 8.0ms (13.2% of total)
ival-sin: 8.0ms (13.2% of total)
ival-atan2: 4.0ms (6.6% of total)
adjust: 3.0ms (5% of total)
ival-add!: 1.0ms (1.7% of total)
ival-sub!: 1.0ms (1.7% of total)

bsearch3.0ms (0%)

Memory
3.8MiB live, 3.8MiB allocated; 0ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
1.0ms
1.711715853864889
3864132.9373172265
1.0ms
-35.20211910506025
-0.02455112162381432
Compiler

Compiled 1 304 to 1 100 computations (15.6% saved)

bsearch26.0ms (0.3%)

Memory
22.9MiB live, 22.9MiB allocated; 0ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
23.0ms
-1.3337208241755513e-166
-2.5288631419698084e-169
Samples
11.0ms108×0valid
6.0ms20×1valid
Compiler

Compiled 680 to 583 computations (14.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 13.0ms
ival-hypot: 3.0ms (22.4% of total)
ival-mult!: 3.0ms (22.4% of total)
ival-log: 2.0ms (14.9% of total)
ival-sin: 2.0ms (14.9% of total)
adjust: 1.0ms (7.5% of total)
ival-exp: 1.0ms (7.5% of total)
ival-atan2: 1.0ms (7.5% of total)
ival-add!: 0.0ms (0% of total)
ival-sub!: 0.0ms (0% of total)

bsearch0.0ms (0%)

Memory
0.3MiB live, 0.3MiB allocated; 0ms collecting garbage
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
Compiler

Compiled 28 to 26 computations (7.1% saved)

bsearch25.0ms (0.3%)

Memory
14.2MiB live, 14.2MiB allocated; 0ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
23.0ms
503454295710957630.0
4062418428971674600.0
Samples
10.0ms32×1valid
8.0ms64×0valid
Compiler

Compiled 628 to 509 computations (18.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 15.0ms
ival-hypot: 3.0ms (20.2% of total)
ival-mult!: 3.0ms (20.2% of total)
ival-sin: 3.0ms (20.2% of total)
ival-log: 2.0ms (13.4% of total)
adjust: 1.0ms (6.7% of total)
ival-exp: 1.0ms (6.7% of total)
ival-atan2: 1.0ms (6.7% of total)
ival-add!: 0.0ms (0% of total)
ival-sub!: 0.0ms (0% of total)

bsearch139.0ms (1.5%)

Memory
-9.6MiB live, 141.5MiB allocated; 46ms collecting garbage
Algorithm
3×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
49.0ms
3864132.9373172265
5655063779.150718
22.0ms
-35.20211910506025
-0.02455112162381432
61.0ms
-1.523803376967878e+50
-5.957016199920602e+48
Samples
61.0ms277×0valid
18.0ms59×1valid
Compiler

Compiled 2 275 to 1 860 computations (18.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 67.0ms
ival-mult!: 32.0ms (47.6% of total)
ival-log: 10.0ms (14.9% of total)
ival-hypot: 8.0ms (11.9% of total)
ival-sin: 7.0ms (10.4% of total)
ival-atan2: 4.0ms (6% of total)
ival-exp: 3.0ms (4.5% of total)
adjust: 2.0ms (3% of total)
ival-add!: 1.0ms (1.5% of total)
ival-sub!: 1.0ms (1.5% of total)

bsearch98.0ms (1.1%)

Memory
-17.9MiB live, 165.1MiB allocated; 37ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
41.0ms
2.86141047002342e-80
1.3270006313666512e-77
51.0ms
-4.302509185248633e+34
-1308122150319208.8
Samples
39.0ms208×0valid
37.0ms96×1valid
Compiler

Compiled 2 073 to 1 695 computations (18.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 56.0ms
ival-hypot: 17.0ms (30.2% of total)
ival-sin: 12.0ms (21.4% of total)
ival-mult!: 9.0ms (16% of total)
ival-log: 6.0ms (10.7% of total)
adjust: 4.0ms (7.1% of total)
ival-atan2: 4.0ms (7.1% of total)
ival-exp: 3.0ms (5.3% of total)
ival-add!: 1.0ms (1.8% of total)
ival-sub!: 1.0ms (1.8% of total)

bsearch79.0ms (0.9%)

Memory
31.9MiB live, 75.6MiB allocated; 11ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
75.0ms
1.1231699808237794e+112
2.832722530777773e+117
Samples
25.0ms79×1valid
6.0ms59×0valid
5.0ms6×2valid
Compiler

Compiled 931 to 707 computations (24.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 31.0ms
ival-sin: 7.0ms (22.8% of total)
ival-hypot: 5.0ms (16.3% of total)
ival-mult!: 5.0ms (16.3% of total)
ival-log: 5.0ms (16.3% of total)
adjust: 4.0ms (13% of total)
ival-atan2: 3.0ms (9.8% of total)
ival-exp: 2.0ms (6.5% of total)
ival-add!: 0.0ms (0% of total)
ival-sub!: 0.0ms (0% of total)

bsearch199.0ms (2.2%)

Memory
13.1MiB live, 101.8MiB allocated; 16ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
192.0ms
7.572544343050647e+29
3.4565407039774836e+40
Samples
150.0ms13×2valid
26.0ms80×1valid
8.0ms67×0valid
Compiler

Compiled 930 to 703 computations (24.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 178.0ms
ival-sin: 147.0ms (82.6% of total)
ival-mult!: 7.0ms (3.9% of total)
ival-hypot: 6.0ms (3.4% of total)
ival-log: 5.0ms (2.8% of total)
adjust: 4.0ms (2.2% of total)
ival-sub!: 4.0ms (2.2% of total)
ival-atan2: 3.0ms (1.7% of total)
ival-exp: 2.0ms (1.1% of total)
ival-add!: 1.0ms (0.6% of total)

bsearch28.0ms (0.3%)

Memory
-17.2MiB live, 39.7MiB allocated; 9ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
17.0ms
3864132.9373172265
5655063779.150718
Samples
8.0ms65×0valid
5.0ms15×1valid
Compiler

Compiled 864 to 623 computations (27.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 10.0ms
ival-hypot: 2.0ms (19.5% of total)
ival-mult!: 2.0ms (19.5% of total)
ival-log: 2.0ms (19.5% of total)
ival-sin: 2.0ms (19.5% of total)
adjust: 1.0ms (9.8% of total)
ival-exp: 1.0ms (9.8% of total)
ival-atan2: 1.0ms (9.8% of total)
ival-add!: 0.0ms (0% of total)
ival-sub!: 0.0ms (0% of total)

bsearch92.0ms (1%)

Memory
-19.3MiB live, 116.8MiB allocated; 12ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
89.0ms
1.232379757360294e+42
1.3981611072748344e+49
Samples
62.0ms71×1valid
9.0ms9×2valid
7.0ms64×0valid
Compiler

Compiled 1 003 to 734 computations (26.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 73.0ms
ival-atan2: 42.0ms (57.4% of total)
ival-sin: 10.0ms (13.7% of total)
ival-hypot: 5.0ms (6.8% of total)
ival-mult!: 5.0ms (6.8% of total)
adjust: 4.0ms (5.5% of total)
ival-log: 4.0ms (5.5% of total)
ival-exp: 2.0ms (2.7% of total)
ival-sub!: 1.0ms (1.4% of total)
ival-add!: 0.0ms (0% of total)

derivations605.0ms (6.7%)

Memory
22.0MiB live, 590.6MiB allocated; 106ms collecting garbage
Stop Event
1×fuel
Compiler

Compiled 503 to 245 computations (51.3% saved)

preprocess224.0ms (2.5%)

Memory
-4.6MiB live, 421.9MiB allocated; 102ms collecting garbage
Compiler

Compiled 528 to 264 computations (50% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...