powComplex, real part

Time bar (total: 8.5s)

start0.0ms (0.0%)

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

analyze399.0ms (4.7%)

Memory
-1.5MiB live, 466.3MiB allocated; 180ms collecting garbage
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0.0%0.0%99.8%0.2%0.0%0.0%0.0%0
0.0%0.0%99.8%0.2%0.0%0.0%0.0%1
0.0%0.0%99.8%0.2%0.0%0.0%0.0%2
0.0%0.0%99.8%0.2%0.0%0.0%0.0%3
0.0%0.0%99.8%0.2%0.0%0.0%0.0%4
0.0%0.0%99.8%0.2%0.0%0.0%0.0%5
0.0%0.0%99.8%0.2%0.0%0.0%0.0%6
18.8%18.7%81.1%0.2%0.0%0.0%0.0%7
18.8%18.7%81.1%0.2%0.0%0.0%0.0%8
18.8%18.7%81.1%0.2%0.0%0.0%0.0%9
34.4%34.3%65.5%0.2%0.0%0.0%0.0%10
54.7%54.6%45.2%0.2%0.0%0.0%0.0%11
54.7%54.6%45.2%0.2%0.0%0.0%0.0%12
Compiler

Compiled 39 to 18 computations (53.8% saved)

sample3.1s (36.8%)

Memory
-9.7MiB live, 4 300.6MiB allocated; 1.8s collecting garbage
Samples
1.8s2 994×1valid
869.0ms5 262×0valid
Precisions
Click to see histograms. Total time spent on operations: 2.3s
ival-cos: 837.0ms (36.9% of total)
ival-hypot: 354.0ms (15.6% of total)
ival-log: 307.0ms (13.5% of total)
ival-mult!: 306.0ms (13.5% of total)
ival-atan2: 168.0ms (7.4% of total)
adjust: 159.0ms (7.0% of total)
ival-exp: 82.0ms (3.6% of total)
ival-add!: 32.0ms (1.4% of total)
ival-sub!: 25.0ms (1.1% of total)
Bogosity

preprocess69.0ms (0.8%)

Memory
-7.1MiB live, 52.3MiB allocated; 58ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0141571
1661554
22992554
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
40.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))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Compiler

Compiled 74 to 38 computations (48.6% saved)

sample0.0ms (0.0%)

Memory
0.1MiB live, 0.1MiB allocated; 0ms collecting garbage
Calls
Call 1
Inputs
Outputs

series305.0ms (3.6%)

Memory
55.1MiB live, 425.6MiB allocated; 75ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0158220797
Stop Event
iter-limit
Counts
19 → 267
Calls
Call 1
Inputs
x.re
(*.f64 x.re x.re)
x.im
(*.f64 x.im x.im)
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
y.re
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(atan2.f64 x.im x.re)
y.im
(*.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))
(exp.f64 (-.f64 (*.f64 (log.f64 (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.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))
(cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (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 x.re x.re)
#s(approx (* x.re x.re) (pow.f64 x.re #s(literal 2 binary64)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (pow.f64 x.im #s(literal 2 binary64)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (- (* (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 (pow.f64 x.im #s(literal 2 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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 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 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 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 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #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 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #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 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))))
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))))))))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#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)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#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) (+.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 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 (*.f64 #s(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 (+.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (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) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(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 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(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 (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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#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 (*.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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#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 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#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)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#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) (+.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 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 (*.f64 #s(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 (+.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (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) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(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 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(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 x.im x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #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 (sqrt.f64 (pow.f64 x.re #s(literal 2 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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 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 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 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 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #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 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #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 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #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)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))))))))))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))
#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)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#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) (+.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #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 (*.f64 #s(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 (+.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (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) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(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 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(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 (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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#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 (*.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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))
#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 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))))
#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)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#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) (+.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #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 (*.f64 #s(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 (+.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (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) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(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 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx y.re y.re)
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 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 #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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (+.f64 (*.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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im 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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re) (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 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 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (/.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 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx y.im y.im)
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (+.f64 (*.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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) 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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
Calls

12 calls:

TimeVariablePoint
68.0ms
y.re
0
23.0ms
y.re
inf
15.0ms
y.im
0
13.0ms
x.re
-inf
11.0ms
x.im
inf

rewrite217.0ms (2.6%)

Memory
-1.3MiB live, 518.4MiB allocated; 80ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
019176
034176
1139174
2603174
32880174
04578174
Stop Event
iter-limit
node-limit
iter-limit
Counts
19 → 276
Calls
Call 1
Inputs
x.re
(*.f64 x.re x.re)
x.im
(*.f64 x.im x.im)
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
y.re
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(atan2.f64 x.im x.re)
y.im
(*.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))
(exp.f64 (-.f64 (*.f64 (log.f64 (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.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))
(cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (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
x.re
(*.f64 (pow.f64 (fabs.f64 x.re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 x.re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 x.re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 x.re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 x.re))) (neg.f64 (neg.f64 (fabs.f64 x.re))))
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (fabs.f64 x.re))
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (neg.f64 x.re))
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)))
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) x.re)
(*.f64 (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 x.re)) (neg.f64 (fabs.f64 x.re)))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 (neg.f64 (fabs.f64 x.re)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 x.re) #s(literal 2 binary64))
(pow.f64 (neg.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))
(neg.f64 (*.f64 (neg.f64 x.re) x.re))
(sqrt.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))
(fabs.f64 (*.f64 (neg.f64 x.re) x.re))
(fabs.f64 (*.f64 x.re x.re))
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.re)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 x.re)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
x.im
(*.f64 (pow.f64 (fabs.f64 x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 x.im))) (neg.f64 (neg.f64 (fabs.f64 x.im))))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 x.im))) (fabs.f64 x.im))
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (fabs.f64 x.im))
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (neg.f64 x.im))
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) x.im)
(*.f64 (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 x.im)) (neg.f64 (fabs.f64 x.im)))
(*.f64 (fabs.f64 x.im) (neg.f64 (neg.f64 (fabs.f64 x.im))))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 (neg.f64 (fabs.f64 x.im)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 x.im) #s(literal 2 binary64))
(pow.f64 (neg.f64 x.im) #s(literal 2 binary64))
(pow.f64 (*.f64 x.im x.im) #s(literal 1 binary64))
(pow.f64 x.im #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 x.im) x.im))
(sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))
(fabs.f64 (*.f64 (neg.f64 x.im) x.im))
(fabs.f64 (*.f64 x.im x.im))
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.im)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 x.im)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re))
(*.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re))
(*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(pow.f64 (*.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 2 binary64))
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re))) (+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re)))
(/.f64 (-.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.re) x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (+.f64 (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) 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 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im))) (+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im)))
(/.f64 (+.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (+.f64 (*.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)))))
(/.f64 (-.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (+.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) 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))) (+.f64 (*.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)))))
(neg.f64 (+.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.im) x.im)))
(neg.f64 (-.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im)))
(neg.f64 (-.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re)))
(-.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))
(-.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(sqrt.f64 (*.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(fabs.f64 (*.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(fabs.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(fabs.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (neg.f64 (fabs.f64 x.re))) (fabs.f64 x.re)))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 (sqrt.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(fabs.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
y.re
(*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (log.f64 (exp.f64 y.re)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re)
(log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))
(atan2.f64 x.im x.re)
(neg.f64 (neg.f64 (atan2.f64 x.im x.re)))
y.im
(*.f64 (neg.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re))
(*.f64 (neg.f64 y.im) (neg.f64 (atan2.f64 x.im x.re)))
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.im))
(*.f64 y.im (atan2.f64 x.im x.re))
(*.f64 (atan2.f64 x.im x.re) (neg.f64 (neg.f64 y.im)))
(*.f64 (atan2.f64 x.im x.re) y.im)
(neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (-.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(/.f64 (+.f64 (pow.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (-.f64 (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
(/.f64 (-.f64 (*.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
(/.f64 (-.f64 (pow.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 y.im (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (+.f64 (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
(neg.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(-.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))
(+.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (neg.f64 (*.f64 (neg.f64 y.re) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(+.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(+.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(*.f64 (sqrt.f64 (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (sqrt.f64 (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(*.f64 (neg.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) (/.f64 #s(literal 1 binary64) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))
(*.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
(*.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(pow.f64 (exp.f64 (*.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal -1 binary64))
(/.f64 (+.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (-.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(/.f64 (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(/.f64 (+.f64 (pow.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64)) (pow.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))))
(/.f64 (-.f64 (pow.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (+.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))))
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 #s(literal 2 binary64) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))))) #s(literal 4 binary64))
(/.f64 (*.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re) #s(literal 1 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(/.f64 (neg.f64 (neg.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (neg.f64 (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(/.f64 (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(/.f64 (+.f64 (pow.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (-.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))))))
(/.f64 (neg.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (neg.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(/.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(neg.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
(-.f64 (+.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (cosh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(-.f64 (+.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (cosh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(-.f64 (*.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (cosh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (-.f64 (*.f64 (sinh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
(-.f64 (*.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (cosh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (+.f64 (*.f64 (sinh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(-.f64 (*.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (-.f64 (*.f64 (sinh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (cosh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(-.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (neg.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(-.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(sqrt.f64 (exp.f64 (*.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))) #s(literal 2 binary64))))
(fabs.f64 (neg.f64 (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
(fabs.f64 (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
(exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (cosh.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (sinh.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(+.f64 (+.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (cosh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(+.f64 (+.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (cosh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(+.f64 (/.f64 (cosh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (sinh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(+.f64 (*.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (cosh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (+.f64 (*.f64 (sinh.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
(+.f64 (*.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (cosh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (-.f64 (*.f64 (sinh.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(+.f64 (*.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (+.f64 (*.f64 (sinh.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (cosh.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(+.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(+.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
(*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)
(log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.im))
(*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re))
(*.f64 (neg.f64 y.re) (neg.f64 (atan2.f64 x.im x.re)))
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re))
(*.f64 (atan2.f64 x.im x.re) (neg.f64 (neg.f64 y.re)))
(*.f64 (atan2.f64 x.im x.re) y.re)
(*.f64 y.re (atan2.f64 x.im x.re))
(neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(/.f64 (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (+.f64 (*.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(/.f64 (-.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (-.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (+.f64 (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))))
(/.f64 (-.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(neg.f64 (-.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re)))
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))
(+.f64 (neg.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (atan2.f64 x.im x.re) y.re))
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 (neg.f64 y.im)) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) y.im))
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (neg.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(+.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64))) (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) (-.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (-.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (-.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (-.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (PI.f64) #s(literal -1/2 binary64))))
(sin.f64 (+.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(-.f64 (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(-.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 1 binary64)))
(-.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (neg.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))
(-.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (neg.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (neg.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(cos.f64 (-.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re)))
(cos.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(+.f64 (*.f64 (sin.f64 (-.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(+.f64 (*.f64 (sin.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(+.f64 (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (PI.f64) #s(literal -1/2 binary64))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(+.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)))
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(*.f64 (*.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(*.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(*.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re) (/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
(*.f64 (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (neg.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(/.f64 (*.f64 (neg.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(/.f64 (-.f64 (*.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (-.f64 (*.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))))
(/.f64 (neg.f64 (*.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(/.f64 (*.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(/.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))
(/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(neg.f64 (*.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
(neg.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))
(-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
(-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (neg.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))
(+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))
(+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(+.f64 (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
(+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (exp.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
(+.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (sinh.f64 (-.f64 (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))

eval71.0ms (0.8%)

Memory
-13.8MiB live, 507.2MiB allocated; 27ms collecting garbage
Compiler

Compiled 43 350 to 4 094 computations (90.6% saved)

prune26.0ms (0.3%)

Memory
11.0MiB live, 55.7MiB allocated; 7ms collecting garbage
Pruning

17 alts after pruning (17 fresh and 0 done)

PrunedKeptTotal
New51217529
Fresh000
Picked101
Done000
Total51317530
Accuracy
95.3%
Counts
530 → 17
Alt Table
Click to see full alt table
StatusAccuracyProgram
40.7%
(/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
26.3%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
40.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))) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))))))
39.5%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
41.0%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
16.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))))
36.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
44.0%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
61.5%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
41.0%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
36.3%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
32.9%
(*.f64 (exp.f64 (-.f64 (*.f64 #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)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 #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)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
37.6%
(*.f64 (exp.f64 (-.f64 (*.f64 #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)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 #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)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
28.2%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
27.5%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
50.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
28.6%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
Compiler

Compiled 2 244 to 1 044 computations (53.5% saved)

sample0.0ms (0.0%)

Memory
0.8MiB live, 0.8MiB allocated; 0ms collecting garbage
Calls
Call 1
Inputs
2
-1
1/2
Outputs
#s(literal 2 binary64)
#s(literal -1 binary64)
#s(literal 1/2 binary64)
Samples
0.0ms0valid
Compiler

Compiled 5 to 5 computations (0.0% saved)

Precisions
Click to see histograms. Total time spent on operations: 0.0ms
adjust: 0.0ms (0.0% of total)

series1.1s (13.0%)

Memory
34.3MiB live, 2 319.1MiB allocated; 405ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
05402151163
Stop Event
iter-limit
Counts
61 → 822
Calls
Call 1
Inputs
x.re
(*.f64 x.re x.re)
x.im
(*.f64 x.im x.im)
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
y.re
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(atan2.f64 x.im x.re)
y.im
(*.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))
(exp.f64 (-.f64 (*.f64 (log.f64 (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 y.re (atan2.f64 x.im x.re))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(literal 2 binary64)
(pow.f64 x.im #s(literal 2 binary64))
(pow.f64 x.re #s(literal 2 binary64))
(+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))
(sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))
(pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(literal -1 binary64)
(*.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))
(log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re)))
(*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.re)
(-.f64 (*.f64 (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))
(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 (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))
(cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
#s(literal 1/2 binary64)
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
(log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(*.f64 y.im (atan2.f64 x.im x.re))
(*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re)
(-.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(exp.f64 (-.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im)
(+.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Outputs
#s(approx x.re x.re)
#s(approx (* x.re x.re) (pow.f64 x.re #s(literal 2 binary64)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (pow.f64 x.im #s(literal 2 binary64)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (- (* (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 (pow.f64 x.im #s(literal 2 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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 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 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 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 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #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 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #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 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))))))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (cos (* y.re (atan2 x.im x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))))))))))))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.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 (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #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)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (log.f64 (pow.f64 x.im #s(literal 2 binary64))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (log.f64 (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (log.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (log.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))))
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))))))))
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (*.f64 #s(literal 1/24 binary64) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))))))) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))))))))) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))))))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))))) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.im #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#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)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#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) (+.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 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 (*.f64 #s(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 (+.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(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 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(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 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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 (+ (pow x.im 2) (pow x.re 2))) 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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (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 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (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) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.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 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.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 y.im (atan2.f64 x.im x.re))) (+.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 y.im (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))) (pow.f64 x.re #s(literal 6 binary64))))))))
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re))))) (pow.f64 x.re #s(literal 6 binary64))))))))
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))))
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))))
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#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 (*.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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#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 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#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)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#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) (+.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 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 (*.f64 #s(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 (+.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(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 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(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 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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 (+ (pow x.im 2) (pow x.re 2))) 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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (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 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (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) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.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 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.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 y.im (atan2.f64 x.im x.re))) (+.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 y.im (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))))))))
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))))
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))))
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64)))) x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal 4 binary64))))) x.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) x.re))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 1 binary64) x.re)))))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx x.im x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #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 (sqrt.f64 (pow.f64 x.re #s(literal 2 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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 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 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 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 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #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 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #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 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))))))))))))))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #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)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (log.f64 (pow.f64 x.re #s(literal 2 binary64))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (log.f64 (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (log.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (log.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))))
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))))))))
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (*.f64 #s(literal 1/24 binary64) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))))))) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))))))))) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))))))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))))) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 x.re #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))
#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)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#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) (+.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #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 (*.f64 #s(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 (+.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(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 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(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 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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 (+ (pow x.im 2) (pow x.re 2))) 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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (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 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (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) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.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 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.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 y.im (atan2.f64 x.im x.re))) (+.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 y.im (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))) (pow.f64 x.im #s(literal 6 binary64))))))))
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im))))) (pow.f64 x.im #s(literal 6 binary64))))))))
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))))
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))))
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 4 binary64)))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.im (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.im (/.f64 #s(literal 1 binary64) x.im)))))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#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 (*.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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))
#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 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))))
#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)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#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) (+.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #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 (*.f64 #s(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 (+.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(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 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(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 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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 (+ (pow x.im 2) (pow x.re 2))) 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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (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 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (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) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.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 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.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 y.im (atan2.f64 x.im x.re))) (+.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 y.im (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64))))))))))))
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))))
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))))
#s(approx (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 4 binary64)))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (*.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (*.f64 #s(literal 24 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64)))) x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) x.im))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal 4 binary64))))) x.im)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) x.im))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x.im) (/.f64 #s(literal 1 binary64) x.im)))))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx y.re y.re)
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 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 #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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 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) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (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 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)))) (*.f64 #s(literal 1/24 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (+.f64 (*.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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #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)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
#s(approx (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 y.re (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 y.re (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (*.f64 y.re (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (*.f64 y.re (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) 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 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) 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 (*.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 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) 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 (*.f64 y.re (+.f64 (*.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 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #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 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (+.f64 (*.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 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im 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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) 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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re) (atan2.f64 x.im x.re))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re)) (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 y.re (-.f64 (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (/.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))) y.re) (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 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 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (/.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 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)) (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))) y.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx y.im y.im)
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (+.f64 (*.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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/48 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 y.im (*.f64 (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 y.im (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (*.f64 y.im (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))))
#s(approx (/ (cos (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (*.f64 y.im (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 y.im (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))
#s(approx (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re))))))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))))) (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re))))
#s(approx (* (exp (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #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 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re))))))))) (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.im)) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) 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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)) (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.im))))))
#s(approx (- (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) 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 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64))) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
Calls

12 calls:

TimeVariablePoint
150.0ms
y.re
0
73.0ms
x.im
0
72.0ms
x.im
inf
51.0ms
y.im
0
50.0ms
x.re
inf

rewrite343.0ms (4.0%)

Memory
-25.1MiB live, 943.8MiB allocated; 71ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
076953
0129781
1528772
22127772
04042772
Stop Event
iter-limit
node-limit
iter-limit
Counts
61 → 833
Calls
Call 1
Inputs
x.re
(*.f64 x.re x.re)
x.im
(*.f64 x.im x.im)
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
y.re
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(atan2.f64 x.im x.re)
y.im
(*.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))
(exp.f64 (-.f64 (*.f64 (log.f64 (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 y.re (atan2.f64 x.im x.re))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(literal 2 binary64)
(pow.f64 x.im #s(literal 2 binary64))
(pow.f64 x.re #s(literal 2 binary64))
(+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))
(sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))
(pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(literal -1 binary64)
(*.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))
(log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re)))
(*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.re)
(-.f64 (*.f64 (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))
(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 (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))
(cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
#s(literal 1/2 binary64)
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
(log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(*.f64 y.im (atan2.f64 x.im x.re))
(*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re)
(-.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(exp.f64 (-.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im)
(+.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Outputs
x.re
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (fabs.f64 x.re))
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (neg.f64 x.re))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 2 binary64)) (*.f64 x.re x.re))
(*.f64 (*.f64 (neg.f64 x.re) #s(literal -1 binary64)) x.re)
(*.f64 (fabs.f64 (fabs.f64 x.re)) (fabs.f64 (fabs.f64 x.re)))
(*.f64 (neg.f64 (fabs.f64 x.re)) (neg.f64 (fabs.f64 x.re)))
(*.f64 (neg.f64 (neg.f64 x.re)) (neg.f64 (neg.f64 x.re)))
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)))
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) x.re)
(*.f64 (*.f64 (neg.f64 x.re) x.re) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 x.re x.re))
(*.f64 (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 x.re) x.re))
(*.f64 (*.f64 x.re x.re) (pow.f64 #s(literal -1 binary64) #s(literal 2 binary64)))
(*.f64 (*.f64 x.re x.re) #s(literal 1 binary64))
(*.f64 x.re (*.f64 #s(literal -1 binary64) (neg.f64 x.re)))
(*.f64 x.re x.re)
(pow.f64 (fabs.f64 (fabs.f64 x.re)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (fabs.f64 x.re)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 x.re)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 x.re) #s(literal 2 binary64))
(pow.f64 (neg.f64 x.re) #s(literal 2 binary64))
(pow.f64 x.re #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.re) #s(literal -1 binary64)))
(/.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal -1 binary64)))
(neg.f64 (*.f64 (neg.f64 x.re) x.re))
(fabs.f64 (*.f64 x.re x.re))
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.re)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 x.re)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
x.im
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (fabs.f64 x.im))
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (neg.f64 x.im))
(*.f64 (fabs.f64 (fabs.f64 x.im)) (fabs.f64 (fabs.f64 x.im)))
(*.f64 (neg.f64 (fabs.f64 x.im)) (neg.f64 (fabs.f64 x.im)))
(*.f64 (neg.f64 (neg.f64 x.im)) (neg.f64 (neg.f64 x.im)))
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) x.im)
(*.f64 (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 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 (fabs.f64 (fabs.f64 x.im)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (fabs.f64 x.im)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 x.im)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 x.im) #s(literal 2 binary64))
(pow.f64 (neg.f64 x.im) #s(literal 2 binary64))
(pow.f64 x.im #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal -1 binary64)))
(/.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal -1 binary64)))
(neg.f64 (*.f64 (neg.f64 x.im) x.im))
(fabs.f64 (*.f64 x.im x.im))
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.im)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 x.im)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re))
(/.f64 (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re))) (+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re)))
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im))) (+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.re) x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (+.f64 (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re)))))
(/.f64 (-.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (+.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im)))))
(/.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 (*.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.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (+.f64 (*.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)))))
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (*.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)))))
(neg.f64 (-.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im)))
(neg.f64 (-.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re)))
(-.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))
(-.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (neg.f64 x.re)) x.re))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
(+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (neg.f64 x.im)) x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))
(pow.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (+.f64 (*.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64))
(/.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))))))
(neg.f64 (-.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))))
(sqrt.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(fabs.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal 1/2 binary64))) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(exp.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (log.f64 (exp.f64 #s(literal 1/2 binary64))))
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (log.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(-.f64 (log.f64 (+.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (log.f64 #s(literal 2 binary64)))
(-.f64 (log.f64 (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (log.f64 #s(literal 2 binary64)))
(-.f64 (log.f64 (+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)))) (log.f64 #s(literal 4 binary64)))
(-.f64 (log.f64 (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)))) (log.f64 #s(literal 4 binary64)))
(-.f64 (log.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (log.f64 #s(literal 2 binary64)))
(-.f64 (log.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (log.f64 #s(literal 2 binary64)))
(-.f64 (log.f64 (+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (log.f64 #s(literal 4 binary64)))
(-.f64 (log.f64 (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (log.f64 #s(literal 4 binary64)))
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
y.re
(*.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) (log.f64 (exp.f64 y.re)))
(*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) y.re)
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (log.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) y.re))))
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))
(*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))
(*.f64 y.re (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(log.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))
(atan2.f64 x.im x.re)
y.im
(*.f64 y.im (atan2.f64 x.im x.re))
(*.f64 (atan2.f64 x.im x.re) y.im)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (-.f64 (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 y.im (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
(neg.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im))
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))
(+.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re)))
(+.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
(*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(pow.f64 (pow.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) #s(literal -2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))))
(/.f64 (+.f64 (pow.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))))
(/.f64 (neg.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))))
(/.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(sqrt.f64 (pow.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) #s(literal -2 binary64)))
(fabs.f64 (neg.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
(fabs.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
(exp.f64 (*.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))) #s(literal -1 binary64)))
(exp.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
(+.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
(*.f64 (atan2.f64 x.im x.re) y.re)
(*.f64 y.re (atan2.f64 x.im x.re))
(sin.f64 (+.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re)))
(-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(cos.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(cos.f64 (neg.f64 (fabs.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(cos.f64 (fabs.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))
(cos.f64 (fabs.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(cos.f64 (fabs.f64 (fabs.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(cos.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (fabs.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))
(cos.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))
(cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))
(+.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(+.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))
(*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
(*.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(/.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
(+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
#s(literal 2 binary64)
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (fabs.f64 x.im))
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (neg.f64 x.im))
(*.f64 (fabs.f64 (fabs.f64 x.im)) (fabs.f64 (fabs.f64 x.im)))
(*.f64 (neg.f64 (fabs.f64 x.im)) (neg.f64 (fabs.f64 x.im)))
(*.f64 (neg.f64 (neg.f64 x.im)) (neg.f64 (neg.f64 x.im)))
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) x.im)
(*.f64 (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 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 (fabs.f64 (fabs.f64 x.im)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (fabs.f64 x.im)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 x.im)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 x.im) #s(literal 2 binary64))
(pow.f64 (neg.f64 x.im) #s(literal 2 binary64))
(pow.f64 x.im #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal -1 binary64)))
(/.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal -1 binary64)))
(neg.f64 (*.f64 (neg.f64 x.im) x.im))
(fabs.f64 (*.f64 x.im x.im))
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.im)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 x.im)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (fabs.f64 x.re))
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (neg.f64 x.re))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 2 binary64)) (*.f64 x.re x.re))
(*.f64 (*.f64 (neg.f64 x.re) #s(literal -1 binary64)) x.re)
(*.f64 (fabs.f64 (fabs.f64 x.re)) (fabs.f64 (fabs.f64 x.re)))
(*.f64 (neg.f64 (fabs.f64 x.re)) (neg.f64 (fabs.f64 x.re)))
(*.f64 (neg.f64 (neg.f64 x.re)) (neg.f64 (neg.f64 x.re)))
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)))
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) x.re)
(*.f64 (*.f64 (neg.f64 x.re) x.re) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 x.re x.re))
(*.f64 (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 x.re) x.re))
(*.f64 (*.f64 x.re x.re) (pow.f64 #s(literal -1 binary64) #s(literal 2 binary64)))
(*.f64 (*.f64 x.re x.re) #s(literal 1 binary64))
(*.f64 x.re (*.f64 #s(literal -1 binary64) (neg.f64 x.re)))
(*.f64 x.re x.re)
(pow.f64 (fabs.f64 (fabs.f64 x.re)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (fabs.f64 x.re)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 x.re)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 x.re) #s(literal 2 binary64))
(pow.f64 (neg.f64 x.re) #s(literal 2 binary64))
(pow.f64 x.re #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.re) #s(literal -1 binary64)))
(/.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal -1 binary64)))
(neg.f64 (*.f64 (neg.f64 x.re) x.re))
(fabs.f64 (*.f64 x.re x.re))
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.re)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 x.re)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re))
(/.f64 (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re))) (+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re)))
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im))) (+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.re) x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (+.f64 (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re)))))
(/.f64 (-.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (+.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im)))))
(/.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 (*.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.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (+.f64 (*.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)))))
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (*.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)))))
(neg.f64 (-.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im)))
(neg.f64 (-.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re)))
(-.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))
(-.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (neg.f64 x.re)) x.re))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
(+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (neg.f64 x.im)) x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))
(pow.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (+.f64 (*.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64))
(/.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))))))
(neg.f64 (-.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))))
(sqrt.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(fabs.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal 1/2 binary64))) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(exp.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 #s(literal 1/2 binary64) y.re) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 #s(literal 1/2 binary64) y.re) #s(literal 2 binary64))))
(*.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)))
(pow.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) y.re)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(pow.f64 (exp.f64 y.re) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))
(fabs.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) y.re))) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(exp.f64 (*.f64 (log.f64 (exp.f64 y.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(+.f64 (cosh.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))))
#s(literal -1 binary64)
(*.f64 #s(literal -1 binary64) x.re)
(*.f64 x.re #s(literal -1 binary64))
(neg.f64 x.re)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))
(log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)))
(*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) (log.f64 (exp.f64 y.re)))
(*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re)
(*.f64 y.re (log.f64 (exp.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))))))
(*.f64 y.re (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))))
(log.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re))) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re))) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re)) (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re)) (-.f64 (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re)) (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re))))
(/.f64 (-.f64 (pow.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 y.im (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re)) (+.f64 (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re))))))
(neg.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re)))
(-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im))
(-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))
(+.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re))
(+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))))) (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))))
(*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(pow.f64 (pow.f64 (*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sinh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re))))
(/.f64 (+.f64 (pow.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re))))))))
(/.f64 (neg.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re)) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re)))
(/.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re))))
(/.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re))))
(sqrt.f64 (pow.f64 (*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) #s(literal 2 binary64)))
(fabs.f64 (neg.f64 (*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
(fabs.f64 (*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
(exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (sinh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))))
(*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)
(*.f64 y.im (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))))
(log.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.im))
(*.f64 (atan2.f64 x.im x.re) y.re)
(*.f64 y.re (atan2.f64 x.im x.re))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))
(/.f64 (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (+.f64 (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))) (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(neg.f64 (neg.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)))) y.im))
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 y.im) (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)))))
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (neg.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))
(-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))
(+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re))
(+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))
(+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.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))) (neg.f64 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))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 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))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (cos.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 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))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))))
(neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.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))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))
(-.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.f64 (*.f64 (neg.f64 (neg.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))) (neg.f64 x.re))) y.im)) (cos.f64 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.f64 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(-.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (neg.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))))
(-.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))))
(cos.f64 (neg.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))))
(cos.f64 (fabs.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))))
(cos.f64 (fabs.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))))
(cos.f64 (neg.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))
(cos.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))
(cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))
(+.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))))
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)))) y.im))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)))) y.im))))
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 (neg.f64 y.im) (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 y.im) (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)))))))
(+.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (neg.f64 (sin.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))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(+.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))
(+.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))))
(+.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(+.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (neg.f64 (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(+.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) (*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
(*.f64 (*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))
(/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(/.f64 (*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))) (sinh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re))))))
(+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))))
#s(literal 1/2 binary64)
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re))
(/.f64 (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re))) (+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re)))
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im))) (+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.re) x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (+.f64 (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re)))))
(/.f64 (-.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (+.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im)))))
(/.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 (*.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.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (+.f64 (*.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)))))
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (*.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)))))
(neg.f64 (-.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im)))
(neg.f64 (-.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re)))
(-.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))
(-.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (neg.f64 x.re)) x.re))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
(+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (neg.f64 x.im)) x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (log.f64 (exp.f64 #s(literal 1/2 binary64))))
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (log.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(-.f64 (log.f64 (+.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (log.f64 #s(literal 2 binary64)))
(-.f64 (log.f64 (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (log.f64 #s(literal 2 binary64)))
(-.f64 (log.f64 (+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)))) (log.f64 #s(literal 4 binary64)))
(-.f64 (log.f64 (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)))) (log.f64 #s(literal 4 binary64)))
(-.f64 (log.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (log.f64 #s(literal 2 binary64)))
(-.f64 (log.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (log.f64 #s(literal 2 binary64)))
(-.f64 (log.f64 (+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (log.f64 #s(literal 4 binary64)))
(-.f64 (log.f64 (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (log.f64 #s(literal 4 binary64)))
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(*.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) y.im)
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.im))
(*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.im))
(*.f64 y.im (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(log.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.im)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (atan2.f64 x.im x.re) y.re))
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im))) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re)))
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(neg.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im))
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 (neg.f64 y.im)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)))
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(sin.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(sin.f64 (neg.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (PI.f64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (PI.f64)) (PI.f64)))
(sin.f64 (+.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 (neg.f64 (neg.f64 y.im)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 (neg.f64 y.im)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re))))
(-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im))))
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)))))
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(cos.f64 (neg.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(cos.f64 (fabs.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(cos.f64 (fabs.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (PI.f64)) (PI.f64)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(cos.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(cos.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(+.f64 (*.f64 (sin.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(+.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im))))
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(*.f64 y.im (atan2.f64 x.im x.re))
(*.f64 (atan2.f64 x.im x.re) y.im)
(*.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) (log.f64 (exp.f64 y.re)))
(*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) y.re)
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (log.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) y.re))))
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))
(*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))
(*.f64 y.re (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(log.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))
(/.f64 (-.f64 (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re))) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 y.im (atan2.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re))) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re)) (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re)))))
(/.f64 (-.f64 (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (+.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(/.f64 (-.f64 (pow.f64 (*.f64 y.im (atan2.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(neg.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (neg.f64 (neg.f64 y.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))))
(-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re)))
(-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re) (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re) (*.f64 y.im (atan2.f64 x.im x.re)))
(+.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
(*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))
(pow.f64 (pow.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) #s(literal 1 binary64))
(pow.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
(/.f64 (+.f64 (pow.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))
(/.f64 (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (neg.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))))
(/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
(/.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))
(-.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
(sqrt.f64 (pow.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) #s(literal 2 binary64)))
(fabs.f64 (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))))
(fabs.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))))
(exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(+.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
(+.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(*.f64 (/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))
(*.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))))))
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
(*.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(/.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 1 binary64)) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))) (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(/.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))))
(/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))))))
(/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))))
(neg.f64 (/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))))))
(neg.f64 (/.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))))
(-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))))
(+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
(+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64))
(cosh.f64 (neg.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(cosh.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(cosh.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(cosh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(+.f64 (/.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)))
(*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(/.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64))
(sinh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))
(pow.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (+.f64 (*.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64))
(/.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))))))
(neg.f64 (-.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))))
(sqrt.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(fabs.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal 1/2 binary64))) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(exp.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)))
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (log.f64 (exp.f64 #s(literal 1/2 binary64))))
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (log.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(-.f64 (log.f64 (+.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (log.f64 #s(literal 2 binary64)))
(-.f64 (log.f64 (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (log.f64 #s(literal 2 binary64)))
(-.f64 (log.f64 (+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)))) (log.f64 #s(literal 4 binary64)))
(-.f64 (log.f64 (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)))) (log.f64 #s(literal 4 binary64)))
(-.f64 (log.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (log.f64 #s(literal 2 binary64)))
(-.f64 (log.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (log.f64 #s(literal 2 binary64)))
(-.f64 (log.f64 (+.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (log.f64 #s(literal 4 binary64)))
(-.f64 (log.f64 (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (log.f64 #s(literal 4 binary64)))
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(*.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) (log.f64 (exp.f64 y.re)))
(*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) y.re)
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (log.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) y.re))))
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))
(*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))
(*.f64 y.re (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(log.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (-.f64 (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 y.im (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
(neg.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im))
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))
(+.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re)))
(+.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
(*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(pow.f64 (pow.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) #s(literal -2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))))
(/.f64 (+.f64 (pow.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))))
(/.f64 (neg.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))))
(/.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(sqrt.f64 (pow.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) #s(literal -2 binary64)))
(fabs.f64 (neg.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
(fabs.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
(exp.f64 (*.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))) #s(literal -1 binary64)))
(exp.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
(+.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
(*.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) y.im)
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.im))
(*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.im))
(*.f64 y.im (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(log.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.im)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (atan2.f64 x.im x.re) y.re))
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im))) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re)))
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(neg.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im))
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 (neg.f64 y.im)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)))
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(sin.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(sin.f64 (neg.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (PI.f64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (PI.f64)) (PI.f64)))
(sin.f64 (+.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 (neg.f64 (neg.f64 y.im)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 (neg.f64 y.im)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re))))
(-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im))))
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)))))
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(cos.f64 (neg.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(cos.f64 (fabs.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(cos.f64 (fabs.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (PI.f64)) (PI.f64)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(cos.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(cos.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(+.f64 (*.f64 (sin.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(+.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im))))
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(*.f64 (/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))
(*.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))))))
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
(*.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(/.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 1 binary64)) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))) (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(/.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))))
(/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))))))
(/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))))
(neg.f64 (/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re)))))))
(neg.f64 (/.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))))
(-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 (*.f64 #s(literal 1/2 binary64) y.re))))))
(+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
(+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))

eval238.0ms (2.8%)

Memory
51.7MiB live, 510.1MiB allocated; 72ms collecting garbage
Compiler

Compiled 233 111 to 12 057 computations (94.8% saved)

prune74.0ms (0.9%)

Memory
-45.0MiB live, 163.0MiB allocated; 66ms collecting garbage
Pruning

23 alts after pruning (23 fresh and 0 done)

PrunedKeptTotal
New1 469171 486
Fresh6612
Picked505
Done000
Total1 480231 503
Accuracy
97.3%
Counts
1 503 → 23
Alt Table
Click to see full alt table
StatusAccuracyProgram
27.5%
(/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
37.4%
(*.f64 (*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))
23.9%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (+.f64 #s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 #s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
40.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))) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))))))
41.0%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
60.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
62.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
41.3%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
18.7%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
43.3%
(*.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 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))))
36.3%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
32.9%
(*.f64 (exp.f64 (-.f64 (*.f64 #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)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 #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)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
37.6%
(*.f64 (exp.f64 (-.f64 (*.f64 #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)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 #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)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
28.2%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
56.4%
(*.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
50.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
48.6%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
51.3%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
47.0%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))
44.5%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))
21.0%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
30.5%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
51.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
Compiler

Compiled 2 882 to 1 432 computations (50.3% saved)

sample0.0ms (0.0%)

Memory
2.8MiB live, 2.8MiB allocated; 0ms collecting garbage
Calls
Call 1
Inputs
1
2
-1
(PI)
1/2
(* (PI) 1/2)
Outputs
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal -1 binary64)
#s(literal 884279719003555/281474976710656 binary64)
#s(literal 1/2 binary64)
#s(literal 884279719003555/562949953421312 binary64)
Samples
0.0ms0valid
Compiler

Compiled 10 to 8 computations (20.0% saved)

Precisions
Click to see histograms. Total time spent on operations: 0.0ms
adjust: 0.0ms (0.0% of total)

series395.0ms (4.6%)

Memory
38.8MiB live, 1 018.0MiB allocated; 170ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0198225313
Stop Event
iter-limit
Counts
52 → 349
Calls
Call 1
Inputs
x.re
(*.f64 x.re x.re)
x.im
(*.f64 x.im x.im)
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
y.re
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(atan2.f64 x.im x.re)
y.im
(*.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))
(exp.f64 (-.f64 (*.f64 (log.f64 (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(literal 1 binary64)
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(literal 2 binary64)
(pow.f64 x.im #s(literal 2 binary64))
(pow.f64 x.re #s(literal 2 binary64))
(+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))
(sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))
(pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)
(*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
#s(literal -1 binary64)
(/.f64 #s(literal -1 binary64) x.re)
(log.f64 (/.f64 #s(literal -1 binary64) x.re))
(*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))
(*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))
(exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
(neg.f64 y.re)
(*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))
(PI.f64)
#s(literal 1/2 binary64)
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)
(*.f64 (atan2.f64 x.im x.re) y.re)
(+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(*.f64 #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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Outputs
#s(approx x.re x.re)
#s(approx (* x.re x.re) (pow.f64 x.re #s(literal 2 binary64)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (pow.f64 x.im #s(literal 2 binary64)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (- (* (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 (pow.f64 x.im #s(literal 2 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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 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 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 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 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #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 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #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 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))))))))))))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))))))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (/ -1 x.re) (/.f64 #s(literal -1 binary64) x.re))
#s(approx (log (/ -1 x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (neg.f64 x.re))))
#s(approx (* y.re (log (/ -1 x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (neg.f64 x.re)))))
#s(approx (* -1 (* y.re (log (/ -1 x.re)))) (*.f64 y.re (log.f64 (neg.f64 x.re))))
#s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow.f64 (neg.f64 x.re) y.re))
#s(approx (* (neg y.re) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #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)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#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)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#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) (+.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 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 (*.f64 #s(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 (+.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(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 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(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 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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 (+ (pow x.im 2) (pow x.re 2))) 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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (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 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (log (/ -1 x.re)) (log.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x.re))))
#s(approx (* y.re (log (/ -1 x.re))) (*.f64 y.re (log.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x.re)))))
#s(approx (* -1 (* y.re (log (/ -1 x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (neg.f64 (/.f64 #s(literal 1 binary64) 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) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im 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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#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 (*.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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#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 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#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)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#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) (+.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 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 (*.f64 #s(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 (+.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(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 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(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 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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 (+ (pow x.im 2) (pow x.re 2))) 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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (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 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (log (/ -1 x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))
#s(approx (* y.re (log (/ -1 x.re))) (*.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.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) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx x.im x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #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 (sqrt.f64 (pow.f64 x.re #s(literal 2 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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 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 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 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 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #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 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #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 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))))))))))))))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #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)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))
#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)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#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) (+.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #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 (*.f64 #s(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 (+.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(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 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(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 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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 (+ (pow x.im 2) (pow x.re 2))) 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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (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 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (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) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#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 (*.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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))
#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 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))))
#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)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#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) (+.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #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 (*.f64 #s(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 (+.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(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 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(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 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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 (+ (pow x.im 2) (pow x.re 2))) 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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (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 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (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) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx y.re y.re)
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 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 #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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 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) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (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 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)))) (*.f64 #s(literal 1/24 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (+.f64 (*.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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))))))))
#s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))
#s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))
#s(approx (neg y.re) (*.f64 #s(literal -1 binary64) y.re))
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))
#s(approx (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im 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)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.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.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2)) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) 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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.re)) (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx y.im y.im)
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (+.f64 (*.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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) 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 (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
Calls

12 calls:

TimeVariablePoint
124.0ms
x.re
0
46.0ms
y.re
inf
33.0ms
y.re
0
19.0ms
y.re
-inf
15.0ms
x.re
-inf

rewrite216.0ms (2.5%)

Memory
-25.8MiB live, 453.2MiB allocated; 74ms collecting garbage
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
074673
0114663
1334641
21172637
04105637
Stop Event
iter-limit
node-limit
iter-limit
Counts
52 → 676
Calls
Call 1
Inputs
x.re
(*.f64 x.re x.re)
x.im
(*.f64 x.im x.im)
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
y.re
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(atan2.f64 x.im x.re)
y.im
(*.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))
(exp.f64 (-.f64 (*.f64 (log.f64 (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(literal 1 binary64)
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(literal 2 binary64)
(pow.f64 x.im #s(literal 2 binary64))
(pow.f64 x.re #s(literal 2 binary64))
(+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))
(sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))
(pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)
(*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
#s(literal -1 binary64)
(/.f64 #s(literal -1 binary64) x.re)
(log.f64 (/.f64 #s(literal -1 binary64) x.re))
(*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))
(*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))
(exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
(neg.f64 y.re)
(*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))
(PI.f64)
#s(literal 1/2 binary64)
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)
(*.f64 (atan2.f64 x.im x.re) y.re)
(+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(*.f64 #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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Outputs
x.re
(*.f64 (pow.f64 (fabs.f64 x.re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 x.re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 x.re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 x.re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 x.re))) (neg.f64 (neg.f64 (fabs.f64 x.re))))
(*.f64 (neg.f64 (neg.f64 (neg.f64 x.re))) (neg.f64 (neg.f64 (neg.f64 x.re))))
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (fabs.f64 x.re))
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (neg.f64 x.re))
(*.f64 (neg.f64 (fabs.f64 x.re)) (neg.f64 (fabs.f64 x.re)))
(*.f64 (neg.f64 (neg.f64 x.re)) (neg.f64 (neg.f64 x.re)))
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)))
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) x.re)
(*.f64 (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 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 (neg.f64 (fabs.f64 x.re)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 x.re)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 x.re) #s(literal 2 binary64))
(pow.f64 (neg.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))
(/.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) x.re))
(/.f64 (pow.f64 x.re #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) x.re))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 x.re) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 x.re) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal -2 binary64)))
(neg.f64 (*.f64 (neg.f64 x.re) x.re))
(sqrt.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))
(fabs.f64 (*.f64 (neg.f64 x.re) x.re))
(fabs.f64 (*.f64 x.re x.re))
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.re)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 x.re)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
x.im
(*.f64 (pow.f64 (fabs.f64 x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 x.im))) (neg.f64 (neg.f64 (fabs.f64 x.im))))
(*.f64 (neg.f64 (neg.f64 (neg.f64 x.im))) (neg.f64 (neg.f64 (neg.f64 x.im))))
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (fabs.f64 x.im))
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (neg.f64 x.im))
(*.f64 (neg.f64 (fabs.f64 x.im)) (neg.f64 (fabs.f64 x.im)))
(*.f64 (neg.f64 (neg.f64 x.im)) (neg.f64 (neg.f64 x.im)))
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) x.im)
(*.f64 (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 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 (neg.f64 (fabs.f64 x.im)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 x.im)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 x.im) #s(literal 2 binary64))
(pow.f64 (neg.f64 x.im) #s(literal 2 binary64))
(pow.f64 (*.f64 x.im x.im) #s(literal 1 binary64))
(pow.f64 x.im #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal -1 binary64)))
(/.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 x.im) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 x.im) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal -2 binary64)))
(neg.f64 (*.f64 (neg.f64 x.im) x.im))
(sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))
(fabs.f64 (*.f64 (neg.f64 x.im) x.im))
(fabs.f64 (*.f64 x.im x.im))
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.im)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 x.im)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re))
(*.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re))
(*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(pow.f64 (*.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 2 binary64))
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (neg.f64 (neg.f64 x.im)) x.im) (*.f64 (neg.f64 (neg.f64 x.im)) x.im))) (-.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (neg.f64 x.im)) x.im)))
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 x.im)) x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 x.im)) x.im) (*.f64 (neg.f64 (neg.f64 x.im)) x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (neg.f64 x.im)) x.im)))))
(/.f64 (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re))) (+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re)))
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im))) (+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.re) x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (+.f64 (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re)))))
(/.f64 (-.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (+.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im)))))
(/.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 (*.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.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (+.f64 (*.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)))))
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (*.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)))))
(neg.f64 (-.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im)))
(neg.f64 (-.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re)))
(-.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))
(-.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(sqrt.f64 (*.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(fabs.f64 (*.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(fabs.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(fabs.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
(+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (neg.f64 x.im)) x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 (sqrt.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(fabs.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
y.re
(*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (log.f64 (exp.f64 y.re)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.re)
(log.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))
(atan2.f64 x.im x.re)
y.im
(*.f64 y.im (atan2.f64 x.im x.re))
(*.f64 (atan2.f64 x.im x.re) y.im)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (-.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im))) (+.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im)) (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (-.f64 (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 y.im (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
(neg.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im))
(-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))
(+.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(+.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))
(*.f64 (sqrt.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))) (sqrt.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
(*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(pow.f64 (exp.f64 (*.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (-.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
(/.f64 (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(/.f64 (+.f64 (pow.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64)) (pow.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))))
(/.f64 (-.f64 (pow.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 2 binary64) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))) (neg.f64 (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
(/.f64 (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(/.f64 (+.f64 (pow.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))))
(/.f64 (neg.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(/.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) (exp.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im)))
(/.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) (exp.f64 (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
(/.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(/.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(-.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(sqrt.f64 (exp.f64 (*.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))) #s(literal 2 binary64))))
(fabs.f64 (-.f64 (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
(fabs.f64 (neg.f64 (neg.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))))))
(fabs.f64 (neg.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))))
(fabs.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))))
(exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(exp.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (/.f64 (cosh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (sinh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(+.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
(+.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
(+.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))) (/.f64 #s(literal 0 binary64) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(literal 1 binary64)
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))
(*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))))
(*.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))) (*.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))))) (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (-.f64 (*.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))) (-.f64 (*.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))) (*.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(/.f64 (neg.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(/.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(/.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
(+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))))
#s(literal 2 binary64)
(*.f64 (pow.f64 (fabs.f64 x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 x.im))) (neg.f64 (neg.f64 (fabs.f64 x.im))))
(*.f64 (neg.f64 (neg.f64 (neg.f64 x.im))) (neg.f64 (neg.f64 (neg.f64 x.im))))
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (fabs.f64 x.im))
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (neg.f64 x.im))
(*.f64 (neg.f64 (fabs.f64 x.im)) (neg.f64 (fabs.f64 x.im)))
(*.f64 (neg.f64 (neg.f64 x.im)) (neg.f64 (neg.f64 x.im)))
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) x.im)
(*.f64 (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 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 (neg.f64 (fabs.f64 x.im)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 x.im)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 x.im) #s(literal 2 binary64))
(pow.f64 (neg.f64 x.im) #s(literal 2 binary64))
(pow.f64 (*.f64 x.im x.im) #s(literal 1 binary64))
(pow.f64 x.im #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal -1 binary64)))
(/.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 x.im) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 x.im) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal -2 binary64)))
(neg.f64 (*.f64 (neg.f64 x.im) x.im))
(sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))
(fabs.f64 (*.f64 (neg.f64 x.im) x.im))
(fabs.f64 (*.f64 x.im x.im))
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.im)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 x.im)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
(*.f64 (pow.f64 (fabs.f64 x.re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 x.re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 x.re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 x.re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 x.re))) (neg.f64 (neg.f64 (fabs.f64 x.re))))
(*.f64 (neg.f64 (neg.f64 (neg.f64 x.re))) (neg.f64 (neg.f64 (neg.f64 x.re))))
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (fabs.f64 x.re))
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (neg.f64 x.re))
(*.f64 (neg.f64 (fabs.f64 x.re)) (neg.f64 (fabs.f64 x.re)))
(*.f64 (neg.f64 (neg.f64 x.re)) (neg.f64 (neg.f64 x.re)))
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)))
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) x.re)
(*.f64 (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 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 (neg.f64 (fabs.f64 x.re)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 x.re)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 x.re) #s(literal 2 binary64))
(pow.f64 (neg.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))
(/.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) x.re))
(/.f64 (pow.f64 x.re #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) x.re))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 x.re) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 x.re) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal -2 binary64)))
(neg.f64 (*.f64 (neg.f64 x.re) x.re))
(sqrt.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))
(fabs.f64 (*.f64 (neg.f64 x.re) x.re))
(fabs.f64 (*.f64 x.re x.re))
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.re)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 x.re)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re))
(*.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re))
(*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(pow.f64 (*.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 2 binary64))
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (neg.f64 (neg.f64 x.im)) x.im) (*.f64 (neg.f64 (neg.f64 x.im)) x.im))) (-.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (neg.f64 x.im)) x.im)))
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 x.im)) x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 x.im)) x.im) (*.f64 (neg.f64 (neg.f64 x.im)) x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (neg.f64 x.im)) x.im)))))
(/.f64 (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re))) (+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re)))
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im))) (+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.re) x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (+.f64 (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re)))))
(/.f64 (-.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (+.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im)))))
(/.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 (*.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.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (+.f64 (*.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)))))
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (*.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)))))
(neg.f64 (-.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im)))
(neg.f64 (-.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re)))
(-.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))
(-.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(sqrt.f64 (*.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(fabs.f64 (*.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(fabs.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(fabs.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
(+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (neg.f64 x.im)) x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 (sqrt.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(fabs.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(*.f64 (pow.f64 (exp.f64 y.re) (/.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.re) (/.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 2 binary64))))
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re #s(literal 1/2 binary64)) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re #s(literal 1/2 binary64)) #s(literal 2 binary64))))
(*.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 y.re #s(literal 1/2 binary64))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 y.re #s(literal 1/2 binary64))))
(pow.f64 (exp.f64 y.re) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))
(/.f64 (-.f64 (*.f64 (cosh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cosh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (sinh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (-.f64 (cosh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(/.f64 (+.f64 (pow.f64 (cosh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cosh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (-.f64 (*.f64 (sinh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (cosh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(sqrt.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))))
(fabs.f64 (neg.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))))
(fabs.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (exp.f64 y.re)) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 y.re #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(+.f64 (cosh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))
(*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.f64 (atan2.f64 x.im x.re) y.re)
(*.f64 y.re (atan2.f64 x.im x.re))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))) (-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)))) (+.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)))) (+.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (*.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (+.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))) (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64))) (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64))))))
(/.f64 (+.f64 (-.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (+.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 2 binary64))
(/.f64 (+.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))))))
(neg.f64 (sin.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))
(sin.f64 (+.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (atan2.f64 x.im x.re) y.re)))
(-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))))
(-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))))
(-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)))
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(-.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)))
(-.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))))
(-.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)))
(cos.f64 (neg.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(cos.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))
(cos.f64 (fabs.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))
(cos.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))
(cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))
(cos.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))
(+.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(+.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(+.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))
#s(literal -1 binary64)
(*.f64 (pow.f64 (neg.f64 x.re) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 x.re) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) x.re) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) x.re))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) x.re))
(pow.f64 (neg.f64 x.re) #s(literal -1 binary64))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 x.re))))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) x.re))
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 x.re)))
(/.f64 #s(literal -1 binary64) x.re)
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 x.re)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (neg.f64 x.re))))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 x.re) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 x.re #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 x.re))
(neg.f64 (/.f64 #s(literal 1 binary64) x.re))
(exp.f64 (*.f64 (log.f64 (neg.f64 x.re)) #s(literal -1 binary64)))
(+.f64 (/.f64 #s(literal -1 binary64) x.re) (/.f64 #s(literal 0 binary64) (neg.f64 x.re)))
(*.f64 #s(literal -1 binary64) (log.f64 (neg.f64 x.re)))
(neg.f64 (log.f64 (neg.f64 x.re)))
(-.f64 (log.f64 #s(literal 1 binary64)) (log.f64 (neg.f64 x.re)))
(-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (neg.f64 (neg.f64 x.re))))
(-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))
(+.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (log.f64 #s(literal -1 binary64)))
(+.f64 (log.f64 #s(literal 1 binary64)) (neg.f64 (log.f64 (neg.f64 x.re))))
(+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))
(log.f64 (/.f64 #s(literal -1 binary64) x.re))
(*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)
(*.f64 y.re (neg.f64 (log.f64 (neg.f64 x.re))))
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))
(*.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 (neg.f64 x.re)))) y.re)
(*.f64 (neg.f64 (neg.f64 (log.f64 (neg.f64 x.re)))) y.re)
(*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))
(*.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) (log.f64 (exp.f64 #s(literal -1 binary64))))
(*.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) #s(literal -1 binary64))
(*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) (log.f64 (exp.f64 (neg.f64 y.re))))
(*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) (neg.f64 y.re))
(*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))
(*.f64 y.re (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) #s(literal -1 binary64)))
(*.f64 y.re (neg.f64 (neg.f64 (log.f64 (neg.f64 x.re)))))
(neg.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))
(-.f64 (log.f64 #s(literal 1 binary64)) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))
(*.f64 (pow.f64 (exp.f64 (neg.f64 y.re)) (/.f64 (neg.f64 (log.f64 (neg.f64 x.re))) #s(literal 2 binary64))) (pow.f64 (exp.f64 (neg.f64 y.re)) (/.f64 (neg.f64 (log.f64 (neg.f64 x.re))) #s(literal 2 binary64))))
(*.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (/.f64 (neg.f64 y.re) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (/.f64 (neg.f64 y.re) #s(literal 2 binary64))))
(*.f64 (sqrt.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (sqrt.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) x.re) (neg.f64 y.re)) (pow.f64 #s(literal -1 binary64) (neg.f64 y.re)))
(*.f64 (pow.f64 #s(literal -1 binary64) (neg.f64 y.re)) (pow.f64 (/.f64 #s(literal 1 binary64) x.re) (neg.f64 y.re)))
(*.f64 (pow.f64 #s(literal 1 binary64) (neg.f64 y.re)) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))
(*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (/.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (/.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) #s(literal 2 binary64))))
(pow.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 (neg.f64 x.re))))) y.re)
(pow.f64 (exp.f64 (neg.f64 (neg.f64 (log.f64 (neg.f64 x.re))))) y.re)
(pow.f64 (exp.f64 (neg.f64 (log.f64 (neg.f64 x.re)))) (neg.f64 y.re))
(pow.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re) #s(literal -2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 y.re) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) #s(literal -1 binary64)))
(pow.f64 (exp.f64 y.re) (neg.f64 (neg.f64 (log.f64 (neg.f64 x.re)))))
(pow.f64 (exp.f64 (neg.f64 y.re)) (neg.f64 (log.f64 (neg.f64 x.re))))
(pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re) #s(literal -1 binary64))
(pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))
(pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))
(/.f64 (-.f64 (*.f64 (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))) (*.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))) (-.f64 (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))))
(/.f64 (-.f64 (*.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) (*.f64 (sinh.f64 (neg.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))) (sinh.f64 (neg.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))
(/.f64 (-.f64 (*.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) (*.f64 (sinh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (sinh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))
(/.f64 (+.f64 (pow.f64 (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) #s(literal 3 binary64)) (pow.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))) (-.f64 (*.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) (*.f64 (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))))))
(/.f64 (-.f64 (pow.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (neg.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) (+.f64 (*.f64 (sinh.f64 (neg.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))) (sinh.f64 (neg.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))))) (*.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (sinh.f64 (neg.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))))))))
(/.f64 (-.f64 (pow.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) (+.f64 (*.f64 (sinh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (sinh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) (*.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (sinh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))))))
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) (*.f64 #s(literal 2 binary64) (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) (*.f64 (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))))) (/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))
(/.f64 (+.f64 (pow.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) (-.f64 (*.f64 (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))) (*.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))
(/.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 (neg.f64 y.re)) (log.f64 (neg.f64 x.re))))
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))
(-.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (sinh.f64 (neg.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))))
(-.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (sinh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))
(sqrt.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re) #s(literal -2 binary64)))
(fabs.f64 (-.f64 (sinh.f64 (neg.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))))
(fabs.f64 (-.f64 (sinh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))))
(fabs.f64 (neg.f64 (neg.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))))
(fabs.f64 (neg.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))
(fabs.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))
(exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (neg.f64 y.re))) (neg.f64 (log.f64 (neg.f64 x.re)))))
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal -1 binary64))) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))
(exp.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))
(+.f64 (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))
(+.f64 (cosh.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (sinh.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))))
(+.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)) (/.f64 #s(literal 0 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))
(*.f64 #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))
(*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 #s(literal -1 binary64) y.re)
(*.f64 y.re #s(literal -1 binary64))
(neg.f64 y.re)
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.re)
(*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))
(*.f64 (atan2.f64 x.im x.re) (neg.f64 y.re))
(*.f64 y.re (neg.f64 (atan2.f64 x.im x.re)))
(neg.f64 (*.f64 (atan2.f64 x.im x.re) y.re))
(PI.f64)
#s(literal 1/2 binary64)
(*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (PI.f64) #s(literal 2/3 binary64))) (cbrt.f64 (PI.f64)))
(*.f64 (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (log.f64 (exp.f64 (PI.f64))))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 2 binary64))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (PI.f64)))
(log.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))) (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re))) (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (*.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re))) (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(neg.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (atan2.f64 x.im x.re) y.re))
(-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))
(+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))) (-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)))) (+.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)))) (+.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (*.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (+.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))) (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64))) (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64))))))
(/.f64 (+.f64 (-.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (+.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 2 binary64))
(/.f64 (+.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))))))
(neg.f64 (sin.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))
(sin.f64 (+.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (atan2.f64 x.im x.re) y.re)))
(-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))))
(-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))))
(-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)))
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(-.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)))
(-.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))))
(-.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)))
(cos.f64 (neg.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(cos.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))
(cos.f64 (fabs.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))
(cos.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))
(cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))
(cos.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))
(+.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(+.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(+.f64 (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))
(*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))))
(*.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))) (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (-.f64 (*.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (-.f64 (*.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(/.f64 (neg.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(/.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(/.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
(+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (*.f64 y.re #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))))
(*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) y.im)
(log.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.im))
(*.f64 (atan2.f64 x.im x.re) y.re)
(*.f64 y.re (atan2.f64 x.im x.re))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(/.f64 (-.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re))) (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re)))
(/.f64 (-.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))) (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re))))
(/.f64 (-.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))) (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re))))
(/.f64 (-.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))) (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im) (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im))) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (neg.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re)) (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re)))))
(/.f64 (+.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re))) (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re))))))
(/.f64 (+.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (-.f64 (*.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re))) (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re))))))
(/.f64 (+.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (-.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im) (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (+.f64 (*.f64 (neg.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (neg.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))
(/.f64 (-.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))))
(/.f64 (+.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(neg.f64 (neg.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im))
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (neg.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(+.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re))
(+.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))
(+.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))
(+.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))
(+.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64))) (*.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64)))) (-.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (-.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (neg.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) (-.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (neg.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))) (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64))) (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (-.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (neg.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (neg.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (-.f64 (*.f64 (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))))))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (-.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re)))) (-.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (-.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (cos.f64 (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))))
(neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re))) (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re))))
(-.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))))
(-.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))) (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))))
(-.f64 (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(-.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal -1 binary64)))
(-.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(-.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (neg.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(-.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (sin.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))))
(-.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(cos.f64 (neg.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(cos.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(+.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 y.im) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) y.im))))
(+.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(+.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(+.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(+.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(+.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (neg.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(+.f64 (*.f64 (cos.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.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))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))))

eval134.0ms (1.6%)

Memory
35.3MiB live, 263.2MiB allocated; 39ms collecting garbage
Compiler

Compiled 109 101 to 6 767 computations (93.8% saved)

prune53.0ms (0.6%)

Memory
2.0MiB live, 94.2MiB allocated; 6ms collecting garbage
Pruning

32 alts after pruning (32 fresh and 0 done)

PrunedKeptTotal
New1 336201 356
Fresh61218
Picked505
Done000
Total1 347321 379
Accuracy
97.3%
Counts
1 379 → 32
Alt Table
Click to see full alt table
StatusAccuracyProgram
27.5%
(/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
37.4%
(*.f64 (*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))
23.9%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (+.f64 #s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 #s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
57.6%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
42.4%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
18.7%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
43.3%
(*.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 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))))
36.3%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
32.9%
(*.f64 (exp.f64 (-.f64 (*.f64 #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)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 #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)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
37.6%
(*.f64 (exp.f64 (-.f64 (*.f64 #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)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 #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)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
28.2%
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.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))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))))
28.2%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64))) (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64)))))))
29.6%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
17.0%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
25.5%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
26.7%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 #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)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
23.1%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 #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)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
55.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
56.4%
(*.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
55.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
51.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
50.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
30.5%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
30.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
48.6%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
51.3%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
43.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow.f64 (neg.f64 x.re) y.re)))))
15.6%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))
47.0%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))
44.8%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))
21.5%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
30.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
Compiler

Compiled 4 104 to 2 136 computations (48.0% saved)

sample0.0ms (0.0%)

Memory
0.4MiB live, 0.4MiB allocated; 0ms collecting garbage
Calls
Call 1
Inputs
1
1/2
-1
(PI)
(* (PI) 1/2)
2
-1/2
(* -1/2 (PI))
Outputs
#s(literal 1 binary64)
#s(literal 1/2 binary64)
#s(literal -1 binary64)
#s(literal 884279719003555/281474976710656 binary64)
#s(literal 884279719003555/562949953421312 binary64)
#s(literal 2 binary64)
#s(literal -1/2 binary64)
#s(literal -884279719003555/562949953421312 binary64)
Samples
0.0ms0valid
Compiler

Compiled 14 to 10 computations (28.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 0.0ms
adjust: 0.0ms (0.0% of total)

series570.0ms (6.7%)

Memory
28.9MiB live, 1 069.9MiB allocated; 161ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0377854964
Stop Event
iter-limit
Counts
63 → 600
Calls
Call 1
Inputs
x.re
(*.f64 x.re x.re)
x.im
(*.f64 x.im x.im)
(*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))
(sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))))))
y.re
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re)
(atan2.f64 x.im x.re)
y.im
(*.f64 (atan2.f64 x.im x.re) y.im)
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
#s(literal 1 binary64)
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
#s(literal 1/2 binary64)
(*.f64 y.re #s(literal 1/2 binary64))
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.f64 y.re (atan2.f64 x.im x.re))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
#s(literal -1 binary64)
(/.f64 #s(literal -1 binary64) x.re)
(log.f64 (/.f64 #s(literal -1 binary64) x.re))
(*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))
(*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))
(neg.f64 y.re)
(*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))
(PI.f64)
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
#s(literal 2 binary64)
(pow.f64 x.im #s(literal 2 binary64))
(pow.f64 x.re #s(literal 2 binary64))
(+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))
(sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))
(pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)
(*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))
(*.f64 (atan2.f64 x.im x.re) y.re)
(log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(literal -1/2 binary64)
(*.f64 #s(literal -1/2 binary64) (PI.f64))
(-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
Outputs
#s(approx x.re x.re)
#s(approx (* x.re x.re) (pow.f64 x.re #s(literal 2 binary64)))
#s(approx (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (+.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (+.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (+.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 6 binary64))))))))))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 6 binary64))))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 4 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))))))))))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (pow.f64 x.im #s(literal 2 binary64)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))))))))))))))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (/ -1 x.re) (/.f64 #s(literal -1 binary64) x.re))
#s(approx (log (/ -1 x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (neg.f64 x.re))))
#s(approx (* y.re (log (/ -1 x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (neg.f64 x.re)))))
#s(approx (* -1 (* y.re (log (/ -1 x.re)))) (*.f64 y.re (log.f64 (neg.f64 x.re))))
#s(approx (+ 1 (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (neg.f64 x.re)))))
#s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow.f64 (neg.f64 x.re) y.re))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))))))))
#s(approx (* (neg y.re) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #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 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #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 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64))))))))))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (log.f64 (pow.f64 x.im #s(literal 2 binary64))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (log.f64 (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (log.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (log.f64 (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 4 binary64)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 4 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.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 y.re (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.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 y.re (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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) (sqrt (* (* x.im x.im) (* 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 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)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(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) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(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 (+ (* x.im x.im) (* x.re x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (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 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(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 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (log (/ -1 x.re)) (log.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x.re))))
#s(approx (* y.re (log (/ -1 x.re))) (*.f64 y.re (log.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x.re)))))
#s(approx (* -1 (* y.re (log (/ -1 x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (+ 1 (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x.re)))))))
#s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x.re)))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (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 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.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 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(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)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64))))))) (pow.f64 x.re #s(literal 2 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)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.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 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(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)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.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 y.re (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.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 y.re (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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) (sqrt (* (* x.im x.im) (* 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 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)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(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) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(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 (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.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 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (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 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(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 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (log (/ -1 x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))
#s(approx (* y.re (log (/ -1 x.re))) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))
#s(approx (+ 1 (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (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 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(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 (pow.f64 x.im #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 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 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.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 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(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)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64))))))) (pow.f64 x.re #s(literal 2 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)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.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 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(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)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx x.im x.im)
#s(approx (* (* x.im x.im) (* x.im x.im)) (pow.f64 x.im #s(literal 4 binary64)))
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (+.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (+.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (+.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))))))))))))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))))))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (log.f64 (pow.f64 x.re #s(literal 2 binary64))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (log.f64 (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (log.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (log.f64 (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64))))))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 4 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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) (sqrt (* (* x.im x.im) (* 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 (pow.f64 x.re #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(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) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(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 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(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 (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (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 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (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 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.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 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(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)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64))))))) (pow.f64 x.im #s(literal 2 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)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.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 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(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)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.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 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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) (sqrt (* (* x.im x.im) (* 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 (pow.f64 x.re #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.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)))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 #s(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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(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) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (*.f64 #s(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 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (+.f64 (*.f64 #s(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 (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.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 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (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 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (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 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (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 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 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 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.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 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(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)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64))))))) (pow.f64 x.im #s(literal 2 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)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.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 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(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)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (exp.f64 (-.f64 (*.f64 #s(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 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64))))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 y.re (+.f64 (*.f64 #s(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)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx y.re y.re)
#s(approx (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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) (sqrt (* (* x.im x.im) (* 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 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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 (*.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 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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 (*.f64 y.re (+.f64 (*.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 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))) #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 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 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) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (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 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (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 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)))) (*.f64 #s(literal 1/24 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (+.f64 (*.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 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* y.re 1/2) (*.f64 #s(literal 1/2 binary64) y.re))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 y.re (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 y.re (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/48 binary64) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 3 binary64))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (+.f64 (*.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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))
#s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))))))))
#s(approx (neg y.re) (*.f64 #s(literal -1 binary64) y.re))
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))
#s(approx (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 y.re (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 y.re (+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (+.f64 (*.f64 y.re (+.f64 (*.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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.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))))) (+.f64 (*.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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))) (+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (cos (* y.re (atan2 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (+ 1 (* -1 (* y.re (log (/ -1 x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (/.f64 #s(literal 1 binary64) y.re))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2)) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re)))))
#s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re)) (atan2.f64 x.im x.re))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (*.f64 y.re (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re)) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.re)))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ 1 (* -1 (* y.re (log (/ -1 x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (/.f64 #s(literal 1 binary64) y.re)))))
#s(approx (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.re)) (atan2.f64 x.im x.re)))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re))))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))) y.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx y.im y.im)
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (+.f64 (*.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 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 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 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* x.im x.im)))))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 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 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 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 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (+.f64 (*.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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI)))) (+.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64)) (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/48 binary64) (*.f64 y.im (*.f64 (cos.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 3 binary64)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (+.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))))))))) (*.f64 (sin.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (*.f64 y.im (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (sqrt (* (* x.im x.im) (* 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 (+.f64 (sqrt.f64 (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)) (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64))) y.im)) (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
Calls

12 calls:

TimeVariablePoint
47.0ms
y.re
0
37.0ms
x.im
inf
30.0ms
y.im
inf
26.0ms
y.im
0
25.0ms
x.re
-inf

rewrite247.0ms (2.9%)

Memory
-25.2MiB live, 713.4MiB allocated; 138ms collecting garbage
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
090859
0136808
1512756
21987752
04085752
Stop Event
iter-limit
node-limit
iter-limit
Counts
63 → 814
Calls
Call 1
Inputs
x.re
(*.f64 x.re x.re)
x.im
(*.f64 x.im x.im)
(*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))
(sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))))))
y.re
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re)
(atan2.f64 x.im x.re)
y.im
(*.f64 (atan2.f64 x.im x.re) y.im)
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
#s(literal 1 binary64)
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
#s(literal 1/2 binary64)
(*.f64 y.re #s(literal 1/2 binary64))
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.f64 y.re (atan2.f64 x.im x.re))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
#s(literal -1 binary64)
(/.f64 #s(literal -1 binary64) x.re)
(log.f64 (/.f64 #s(literal -1 binary64) x.re))
(*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))
(*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))
(neg.f64 y.re)
(*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))
(PI.f64)
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
#s(literal 2 binary64)
(pow.f64 x.im #s(literal 2 binary64))
(pow.f64 x.re #s(literal 2 binary64))
(+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))
(sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))
(pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)
(*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))
(*.f64 (atan2.f64 x.im x.re) y.re)
(log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(literal -1/2 binary64)
(*.f64 #s(literal -1/2 binary64) (PI.f64))
(-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
Outputs
x.re
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (fabs.f64 x.re))
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (neg.f64 x.re))
(*.f64 (fabs.f64 (fabs.f64 x.re)) (fabs.f64 (fabs.f64 x.re)))
(*.f64 (neg.f64 (fabs.f64 x.re)) (neg.f64 (fabs.f64 x.re)))
(*.f64 (neg.f64 (neg.f64 x.re)) (neg.f64 (neg.f64 x.re)))
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)))
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) x.re)
(*.f64 (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 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 (fabs.f64 (fabs.f64 x.re)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (fabs.f64 x.re)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 x.re)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 x.re) #s(literal 2 binary64))
(pow.f64 (neg.f64 x.re) #s(literal 2 binary64))
(pow.f64 x.re #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) x.re))
(/.f64 (pow.f64 x.re #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) x.re))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 x.re) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 x.re) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal -2 binary64)))
(neg.f64 (*.f64 (neg.f64 x.re) x.re))
(fabs.f64 (*.f64 x.re x.re))
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.re)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 x.re)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
x.im
(*.f64 (sqrt.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im))) (sqrt.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im))))
(*.f64 (sqrt.f64 (*.f64 (fabs.f64 x.im) x.im)) (sqrt.f64 (*.f64 (fabs.f64 x.im) x.im)))
(*.f64 (sqrt.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im))) (sqrt.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im))))
(*.f64 (sqrt.f64 (*.f64 x.im (fabs.f64 x.im))) (sqrt.f64 (*.f64 x.im (fabs.f64 x.im))))
(*.f64 (sqrt.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im))) (sqrt.f64 (fabs.f64 x.im)))
(*.f64 (sqrt.f64 (fabs.f64 x.im)) (sqrt.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im))))
(*.f64 (sqrt.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im))) (sqrt.f64 (neg.f64 x.im)))
(*.f64 (sqrt.f64 (neg.f64 x.im)) (sqrt.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im))))
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (fabs.f64 x.im))
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (neg.f64 x.im))
(*.f64 (pow.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (fabs.f64 x.im) x.im) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (fabs.f64 x.im) x.im) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 x.im (fabs.f64 x.im)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 x.im (fabs.f64 x.im)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im)) #s(literal 1/2 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 x.im)) (neg.f64 (fabs.f64 x.im)))
(*.f64 (neg.f64 (neg.f64 x.im)) (neg.f64 (neg.f64 x.im)))
(*.f64 (fabs.f64 (fabs.f64 x.im)) (fabs.f64 (fabs.f64 x.im)))
(*.f64 (sqrt.f64 (*.f64 (neg.f64 x.im) x.im)) (sqrt.f64 (*.f64 (neg.f64 x.im) x.im)))
(*.f64 (sqrt.f64 (*.f64 (*.f64 x.im x.im) x.im)) (sqrt.f64 x.im))
(*.f64 (sqrt.f64 x.im) (sqrt.f64 (*.f64 (*.f64 x.im x.im) x.im)))
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) x.im)
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 1/2 binary64)))
(*.f64 (pow.f64 x.im #s(literal 1/2 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 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 (neg.f64 (fabs.f64 x.im)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 x.im)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 (fabs.f64 x.im)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 x.im) #s(literal 2 binary64))
(pow.f64 (neg.f64 x.im) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) #s(literal 1/2 binary64))
(pow.f64 x.im #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal -1 binary64)))
(/.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 x.im) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 x.im) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) #s(literal -1/2 binary64)))
(neg.f64 (*.f64 (neg.f64 x.im) x.im))
(sqrt.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im))
(fabs.f64 (*.f64 (neg.f64 x.im) x.im))
(fabs.f64 (*.f64 x.im x.im))
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.im)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 x.im)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im)) #s(literal 1 binary64)) (pow.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (fabs.f64 x.im) x.im) #s(literal 1 binary64)) (pow.f64 (*.f64 (fabs.f64 x.im) x.im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im)) #s(literal 1 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 x.im (fabs.f64 x.im)) #s(literal 1 binary64)) (pow.f64 (*.f64 x.im (fabs.f64 x.im)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im)) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 1 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 1 binary64)) (*.f64 (neg.f64 x.im) x.im))
(*.f64 (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(*.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im)) (fabs.f64 x.im))
(*.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im)) (neg.f64 x.im))
(*.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im)) (*.f64 (fabs.f64 x.im) (neg.f64 x.im)))
(*.f64 (*.f64 (fabs.f64 x.im) x.im) (*.f64 (fabs.f64 x.im) x.im))
(*.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im)) (*.f64 (neg.f64 x.im) (fabs.f64 x.im)))
(*.f64 (*.f64 x.im (fabs.f64 x.im)) (*.f64 x.im (fabs.f64 x.im)))
(*.f64 (pow.f64 (*.f64 x.im x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 x.im x.im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) (*.f64 x.im x.im))
(*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)
(*.f64 (fabs.f64 x.im) (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im)))
(*.f64 (neg.f64 x.im) (*.f64 (neg.f64 x.im) (*.f64 x.im x.im)))
(*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im))
(*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) #s(literal 0 binary64)))
(*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))
(*.f64 x.im (*.f64 (*.f64 x.im x.im) x.im))
(pow.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im)) #s(literal 2 binary64))
(pow.f64 (*.f64 (fabs.f64 x.im) x.im) #s(literal 2 binary64))
(pow.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im)) #s(literal 2 binary64))
(pow.f64 (*.f64 x.im (fabs.f64 x.im)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) #s(literal 1/2 binary64))
(pow.f64 (fabs.f64 x.im) #s(literal 4 binary64))
(pow.f64 (neg.f64 x.im) #s(literal 4 binary64))
(pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) #s(literal 1 binary64))
(pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))
(pow.f64 x.im #s(literal 4 binary64))
(/.f64 (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 1 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal -1 binary64)))
(/.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) #s(literal -1/2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -2 binary64)))
(neg.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.im) x.im)))
(neg.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.im x.im)))
(sqrt.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)))
(fabs.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (neg.f64 x.im) x.im)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 4 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 x.im x.im)) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im))) (sqrt.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im))))
(*.f64 (sqrt.f64 (*.f64 (fabs.f64 x.im) x.im)) (sqrt.f64 (*.f64 (fabs.f64 x.im) x.im)))
(*.f64 (sqrt.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im))) (sqrt.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im))))
(*.f64 (sqrt.f64 (*.f64 x.im (fabs.f64 x.im))) (sqrt.f64 (*.f64 x.im (fabs.f64 x.im))))
(*.f64 (sqrt.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im))) (sqrt.f64 (fabs.f64 x.im)))
(*.f64 (sqrt.f64 (fabs.f64 x.im)) (sqrt.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im))))
(*.f64 (sqrt.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im))) (sqrt.f64 (neg.f64 x.im)))
(*.f64 (sqrt.f64 (neg.f64 x.im)) (sqrt.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im))))
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (fabs.f64 x.im))
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (neg.f64 x.im))
(*.f64 (pow.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (fabs.f64 x.im) x.im) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (fabs.f64 x.im) x.im) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 x.im (fabs.f64 x.im)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 x.im (fabs.f64 x.im)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im)) #s(literal 1/2 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 x.im)) (neg.f64 (fabs.f64 x.im)))
(*.f64 (neg.f64 (neg.f64 x.im)) (neg.f64 (neg.f64 x.im)))
(*.f64 (fabs.f64 (fabs.f64 x.im)) (fabs.f64 (fabs.f64 x.im)))
(*.f64 (sqrt.f64 (*.f64 (neg.f64 x.im) x.im)) (sqrt.f64 (*.f64 (neg.f64 x.im) x.im)))
(*.f64 (sqrt.f64 (*.f64 (*.f64 x.im x.im) x.im)) (sqrt.f64 x.im))
(*.f64 (sqrt.f64 x.im) (sqrt.f64 (*.f64 (*.f64 x.im x.im) x.im)))
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) x.im)
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 1/2 binary64)))
(*.f64 (pow.f64 x.im #s(literal 1/2 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 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 (neg.f64 (fabs.f64 x.im)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 x.im)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 (fabs.f64 x.im)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 x.im) #s(literal 2 binary64))
(pow.f64 (neg.f64 x.im) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) #s(literal 1/2 binary64))
(pow.f64 x.im #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal -1 binary64)))
(/.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 x.im) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 x.im) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) #s(literal -1/2 binary64)))
(neg.f64 (*.f64 (neg.f64 x.im) x.im))
(sqrt.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im))
(fabs.f64 (*.f64 (neg.f64 x.im) x.im))
(fabs.f64 (*.f64 x.im x.im))
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.im)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 x.im)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re))) (+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re)))
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im)))
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.re) x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (+.f64 (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re)))))
(/.f64 (-.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (+.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) 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.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
(/.f64 (+.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 x.im x.im) 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)))))
(neg.f64 (-.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im)))
(neg.f64 (-.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re)))
(-.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))
(-.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (neg.f64 x.re)) x.re))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
(+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (neg.f64 x.im)) x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 (sqrt.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(pow.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal -1/2 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -1/2 binary64)))
(-.f64 (cosh.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(-.f64 (cosh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal -1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal -1/2 binary64))))
(sqrt.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(fabs.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))))
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(neg.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal -1/2 binary64)))
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
y.re
(*.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))
(*.f64 (*.f64 #s(literal 1/2 binary64) y.re) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))
(*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) (log.f64 (exp.f64 y.re)))
(*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) y.re)
(*.f64 y.re (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(log.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))
(atan2.f64 x.im x.re)
y.im
(*.f64 y.im (atan2.f64 x.im x.re))
(*.f64 (atan2.f64 x.im x.re) y.im)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)))) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)))) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))) (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))) (-.f64 (*.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))) (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
(/.f64 (-.f64 (pow.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 y.im (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))) (+.f64 (*.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
(neg.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))))
(-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im))
(-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))
(+.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)))
(+.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))
(*.f64 (sqrt.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))) (sqrt.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
(*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(pow.f64 (exp.f64 (*.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (sinh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)))))
(/.f64 (+.f64 (pow.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (sinh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))))
(/.f64 (neg.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (neg.f64 (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(/.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.im)))
(/.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (neg.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
(/.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(/.f64 #s(literal 1 binary64) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)))))
(-.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)))))
(sqrt.f64 (exp.f64 (*.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))) #s(literal 2 binary64))))
(fabs.f64 (neg.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))))
(fabs.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))))
(exp.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)))))
(exp.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (sinh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(literal 1 binary64)
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))
(*.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))))
(/.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(/.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))) (sinh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
(+.f64 (*.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))) (*.f64 (sinh.f64 (-.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re))) (+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re)))
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im)))
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.re) x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (+.f64 (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re)))))
(/.f64 (-.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (+.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) 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.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
(/.f64 (+.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 x.im x.im) 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)))))
(neg.f64 (-.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im)))
(neg.f64 (-.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re)))
(-.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))
(-.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (neg.f64 x.re)) x.re))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
(+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (neg.f64 x.im)) x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) y.re)
(*.f64 y.re #s(literal 1/2 binary64))
(/.f64 (neg.f64 y.re) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) y.re))
(/.f64 y.re #s(literal 2 binary64))
(neg.f64 (*.f64 #s(literal -1/2 binary64) y.re))
(neg.f64 (*.f64 y.re #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)))
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 #s(literal 1/2 binary64) y.re) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 #s(literal 1/2 binary64) y.re) #s(literal 2 binary64))))
(pow.f64 (exp.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal 1/2 binary64) y.re))
(pow.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) y.re)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))
(pow.f64 (exp.f64 y.re) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))
(/.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 y.re) (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 y.re) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal -1/2 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal -1/2 binary64) y.re)))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal -1/2 binary64))))
(fabs.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))
(exp.f64 (*.f64 (log.f64 (exp.f64 y.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))) (sinh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))))
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)))
(*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.f64 (atan2.f64 x.im x.re) y.re)
(*.f64 y.re (atan2.f64 x.im x.re))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))))))
(neg.f64 (sin.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re)))
(-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))))
(-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))))
(-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)))
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(-.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)))
(-.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))))
(-.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(cos.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))
(cos.f64 (neg.f64 (fabs.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(cos.f64 (neg.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(cos.f64 (fabs.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(cos.f64 (fabs.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))
(cos.f64 (fabs.f64 (fabs.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(cos.f64 (fabs.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))
(cos.f64 (fabs.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))
(cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))
(cos.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))
(+.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)))
(+.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))
#s(literal -1 binary64)
(*.f64 (/.f64 #s(literal 1 binary64) x.re) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) x.re))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) x.re))
(pow.f64 (neg.f64 x.re) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 x.re)))
(/.f64 #s(literal -1 binary64) x.re)
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 x.re) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 x.re #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 x.re))
(neg.f64 (/.f64 #s(literal 1 binary64) x.re))
(exp.f64 (*.f64 (log.f64 (neg.f64 x.re)) #s(literal -1 binary64)))
(*.f64 #s(literal -1 binary64) (log.f64 (neg.f64 x.re)))
(neg.f64 (log.f64 (neg.f64 x.re)))
(-.f64 (log.f64 #s(literal 1 binary64)) (log.f64 (neg.f64 x.re)))
(-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (neg.f64 (neg.f64 x.re))))
(-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))
(+.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (log.f64 #s(literal -1 binary64)))
(+.f64 (log.f64 #s(literal 1 binary64)) (neg.f64 (log.f64 (neg.f64 x.re))))
(+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))
(log.f64 (/.f64 #s(literal -1 binary64) x.re))
(*.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (log.f64 (neg.f64 x.re)))) y.re)
(*.f64 (*.f64 #s(literal 1 binary64) y.re) (neg.f64 (log.f64 (neg.f64 x.re))))
(*.f64 (neg.f64 (neg.f64 y.re)) (neg.f64 (log.f64 (neg.f64 x.re))))
(*.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) #s(literal 1 binary64))
(*.f64 (neg.f64 y.re) (neg.f64 (neg.f64 (log.f64 (neg.f64 x.re)))))
(*.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) #s(literal -1 binary64))
(*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)
(*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))
(*.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))
(*.f64 y.re (neg.f64 (log.f64 (neg.f64 x.re))))
(neg.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (*.f64 #s(literal 1 binary64) y.re)))
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 (neg.f64 y.re))))
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))
(*.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 (neg.f64 x.re)))) y.re)
(*.f64 (neg.f64 (neg.f64 (log.f64 (neg.f64 x.re)))) y.re)
(*.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) (log.f64 (exp.f64 #s(literal -1 binary64))))
(*.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) #s(literal -1 binary64))
(*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))
(*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) (log.f64 (exp.f64 (neg.f64 y.re))))
(*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) (neg.f64 y.re))
(*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))
(*.f64 y.re (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) #s(literal -1 binary64)))
(*.f64 y.re (neg.f64 (neg.f64 (log.f64 (neg.f64 x.re)))))
(neg.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))
(-.f64 (log.f64 #s(literal 1 binary64)) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))) (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) (*.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) (+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (*.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))) (*.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re))))))))
(neg.f64 (+.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) #s(literal -1 binary64)))
(neg.f64 (+.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))
(neg.f64 (-.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) #s(literal 1 binary64)))
(-.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))
(+.f64 (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.re) (neg.f64 (log.f64 (neg.f64 x.re)))))
#s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))
#s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))))
(*.f64 #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))
(*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 #s(literal -1 binary64) y.re)
(*.f64 y.re #s(literal -1 binary64))
(neg.f64 y.re)
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.re)
(*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))
(*.f64 (atan2.f64 x.im x.re) (neg.f64 y.re))
(*.f64 y.re (neg.f64 (atan2.f64 x.im x.re)))
(neg.f64 (*.f64 (atan2.f64 x.im x.re) y.re))
(PI.f64)
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (PI.f64) #s(literal 2/3 binary64))) (cbrt.f64 (PI.f64)))
(*.f64 (neg.f64 (PI.f64)) #s(literal -1/2 binary64))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 #s(literal -1/2 binary64) (neg.f64 (PI.f64)))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (log.f64 (exp.f64 (PI.f64))))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (PI.f64)))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(log.f64 (pow.f64 (exp.f64 (neg.f64 (PI.f64))) #s(literal -1/2 binary64)))
(log.f64 (exp.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(neg.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re))
(-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))
(+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))))))
(neg.f64 (sin.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re)))
(-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))))
(-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))))
(-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)))
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(-.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)))
(-.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (neg.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))))
(-.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal -1 binary64)))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(cos.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))
(cos.f64 (neg.f64 (fabs.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(cos.f64 (neg.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(cos.f64 (fabs.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(cos.f64 (fabs.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))))
(cos.f64 (fabs.f64 (fabs.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(cos.f64 (fabs.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))
(cos.f64 (fabs.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (-.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))
(cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))
(cos.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))
(+.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(+.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)))
(+.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)))
#s(literal 2 binary64)
(*.f64 (sqrt.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im))) (sqrt.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im))))
(*.f64 (sqrt.f64 (*.f64 (fabs.f64 x.im) x.im)) (sqrt.f64 (*.f64 (fabs.f64 x.im) x.im)))
(*.f64 (sqrt.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im))) (sqrt.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im))))
(*.f64 (sqrt.f64 (*.f64 x.im (fabs.f64 x.im))) (sqrt.f64 (*.f64 x.im (fabs.f64 x.im))))
(*.f64 (sqrt.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im))) (sqrt.f64 (fabs.f64 x.im)))
(*.f64 (sqrt.f64 (fabs.f64 x.im)) (sqrt.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im))))
(*.f64 (sqrt.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im))) (sqrt.f64 (neg.f64 x.im)))
(*.f64 (sqrt.f64 (neg.f64 x.im)) (sqrt.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im))))
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (fabs.f64 x.im))
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (neg.f64 x.im))
(*.f64 (pow.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (fabs.f64 x.im) (neg.f64 x.im)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (fabs.f64 x.im) x.im) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (fabs.f64 x.im) x.im) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) (fabs.f64 x.im)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 x.im (fabs.f64 x.im)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 x.im (fabs.f64 x.im)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im)) #s(literal 1/2 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (fabs.f64 x.im) (*.f64 x.im x.im)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) (*.f64 x.im x.im)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 x.im)) (neg.f64 (fabs.f64 x.im)))
(*.f64 (neg.f64 (neg.f64 x.im)) (neg.f64 (neg.f64 x.im)))
(*.f64 (fabs.f64 (fabs.f64 x.im)) (fabs.f64 (fabs.f64 x.im)))
(*.f64 (sqrt.f64 (*.f64 (neg.f64 x.im) x.im)) (sqrt.f64 (*.f64 (neg.f64 x.im) x.im)))
(*.f64 (sqrt.f64 (*.f64 (*.f64 x.im x.im) x.im)) (sqrt.f64 x.im))
(*.f64 (sqrt.f64 x.im) (sqrt.f64 (*.f64 (*.f64 x.im x.im) x.im)))
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) x.im)
(*.f64 (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 1/2 binary64)) (pow.f64 x.im #s(literal 1/2 binary64)))
(*.f64 (pow.f64 x.im #s(literal 1/2 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.im (/.f64 #s(literal 2 binary64) #s(literal 2 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 (neg.f64 (fabs.f64 x.im)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 x.im)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 (fabs.f64 x.im)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 x.im) #s(literal 2 binary64))
(pow.f64 (neg.f64 x.im) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) #s(literal 1/2 binary64))
(pow.f64 x.im #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 x.im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.im) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.im) #s(literal -1 binary64)))
(/.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 x.im) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 x.im) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) #s(literal -1/2 binary64)))
(neg.f64 (*.f64 (neg.f64 x.im) x.im))
(sqrt.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im))
(fabs.f64 (*.f64 (neg.f64 x.im) x.im))
(fabs.f64 (*.f64 x.im x.im))
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.im)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 x.im)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (fabs.f64 x.re))
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (neg.f64 x.re))
(*.f64 (fabs.f64 (fabs.f64 x.re)) (fabs.f64 (fabs.f64 x.re)))
(*.f64 (neg.f64 (fabs.f64 x.re)) (neg.f64 (fabs.f64 x.re)))
(*.f64 (neg.f64 (neg.f64 x.re)) (neg.f64 (neg.f64 x.re)))
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)))
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) x.re)
(*.f64 (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x.re (/.f64 #s(literal 2 binary64) #s(literal 2 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 (fabs.f64 (fabs.f64 x.re)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (fabs.f64 x.re)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 x.re)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 x.re) #s(literal 2 binary64))
(pow.f64 (neg.f64 x.re) #s(literal 2 binary64))
(pow.f64 x.re #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 x.re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 x.re) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) x.re))
(/.f64 (pow.f64 x.re #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) x.re))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 x.re) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 x.re) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal -2 binary64)))
(neg.f64 (*.f64 (neg.f64 x.re) x.re))
(fabs.f64 (*.f64 x.re x.re))
(exp.f64 (*.f64 (log.f64 (fabs.f64 x.re)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 x.re)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re))) (+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re)))
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im)))
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.re) x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (+.f64 (*.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 (neg.f64 x.re) x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re)))))
(/.f64 (-.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (+.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) 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.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
(/.f64 (+.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 x.im x.im) 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)))))
(neg.f64 (-.f64 (*.f64 (neg.f64 x.re) x.re) (*.f64 x.im x.im)))
(neg.f64 (-.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re)))
(-.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))
(-.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(+.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (neg.f64 x.re)) x.re))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
(+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (neg.f64 x.im)) x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 (sqrt.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (sqrt.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(pow.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal -1/2 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -1/2 binary64)))
(-.f64 (cosh.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(-.f64 (cosh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal -1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal -1/2 binary64))))
(sqrt.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(fabs.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)))
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 #s(literal 1/2 binary64) y.re) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 #s(literal 1/2 binary64) y.re) #s(literal 2 binary64))))
(pow.f64 (exp.f64 (*.f64 y.re (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal 1/2 binary64) y.re))
(pow.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) y.re)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re))
(pow.f64 (exp.f64 y.re) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(pow.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.re)
(pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))
(/.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 y.re) (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 y.re) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal -1/2 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal -1/2 binary64) y.re)))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal -1/2 binary64))))
(fabs.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))
(exp.f64 (*.f64 (log.f64 (exp.f64 y.re)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))) (sinh.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.re))))
(*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))
(*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))
(+.f64 (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64))))
(+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (*.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 1 binary64)) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)))
(*.f64 (atan2.f64 x.im x.re) y.re)
(*.f64 y.re (atan2.f64 x.im x.re))
(log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(neg.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal -1/2 binary64)))
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(*.f64 (*.f64 y.im (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
(*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) y.im))
(*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) y.im))
(*.f64 (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)) y.im)
(*.f64 y.im (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(log.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.im)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (atan2.f64 x.im x.re) y.re))
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (+.f64 (*.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re)))
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(neg.f64 (neg.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (neg.f64 (neg.f64 y.im)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (neg.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re))
#s(literal -1/2 binary64)
(*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (PI.f64) #s(literal 2/3 binary64))) (cbrt.f64 (PI.f64)))
(*.f64 (neg.f64 (PI.f64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (*.f64 (cbrt.f64 (PI.f64)) #s(literal -1/2 binary64)))
(*.f64 #s(literal -1/2 binary64) (log.f64 (exp.f64 (PI.f64))))
(*.f64 #s(literal -1/2 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal -1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (neg.f64 (PI.f64)))
(neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(log.f64 (pow.f64 (exp.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))
(log.f64 (exp.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (PI.f64)) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) (pow.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(neg.f64 (-.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (-.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (+.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (neg.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(+.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (atan2.f64 x.im x.re) y.re))
(+.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (sin.f64 (+.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (+.f64 (*.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (-.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (PI.f64)))
(sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (*.f64 (neg.f64 (neg.f64 y.im)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 (neg.f64 y.im)) (*.f64 (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (neg.f64 (neg.f64 (atan2.f64 x.im x.re))) y.re))))
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (neg.f64 (neg.f64 y.re)) (atan2.f64 x.im x.re)))))
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.re)))))
(-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (-.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (-.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (cos.f64 (+.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (+.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(-.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(-.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (neg.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(-.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (neg.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (neg.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(-.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(cos.f64 (neg.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(cos.f64 (fabs.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(cos.f64 (fabs.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(cos.f64 (+.f64 (-.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(cos.f64 (neg.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(cos.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
(+.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(+.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(+.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (neg.f64 (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (sin.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) y.im)) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (neg.f64 (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
(+.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal -1 binary64)))
(+.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (neg.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
(+.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) #s(literal 1 binary64)))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.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))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))))

eval195.0ms (2.3%)

Memory
12.0MiB live, 331.3MiB allocated; 66ms collecting garbage
Compiler

Compiled 121 027 to 9 620 computations (92.1% saved)

prune92.0ms (1.1%)

Memory
-13.0MiB live, 132.8MiB allocated; 13ms collecting garbage
Pruning

40 alts after pruning (39 fresh and 1 done)

PrunedKeptTotal
New1 294221 316
Fresh101727
Picked505
Done-110
Total1 308401 348
Accuracy
97.4%
Counts
1 348 → 40
Alt Table
Click to see full alt table
StatusAccuracyProgram
27.5%
(/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
37.4%
(*.f64 (*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))
23.9%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (+.f64 #s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 #s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
42.4%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
18.7%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
43.3%
(*.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 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))))
36.3%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
32.9%
(*.f64 (exp.f64 (-.f64 (*.f64 #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)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 #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)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
37.6%
(*.f64 (exp.f64 (-.f64 (*.f64 #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)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 #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)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
28.2%
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.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))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))))
29.6%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
26.2%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (sin.f64 (+.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
25.4%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
17.0%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
25.5%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
26.7%
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 #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)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
55.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
56.4%
(*.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
55.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
31.8%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64))))))
38.4%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64))))))
27.0%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
36.9%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))
50.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
51.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
48.9%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
44.8%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
30.5%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
15.5%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))
15.6%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))
41.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 #s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) y.re)))
43.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow.f64 (neg.f64 x.re) y.re)))))
18.8%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) (+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))))))
29.0%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.re))))))))
15.6%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) #s(approx (* -1 (* y.re (log (/ -1 x.re)))) (*.f64 y.re (log.f64 (neg.f64 x.re)))))))))
15.5%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) #s(approx (+ 1 (* -1 (* y.re (log (/ -1 x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (/.f64 #s(literal 1 binary64) y.re))))))))
21.5%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
30.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
47.0%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))
46.2%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))
Compiler

Compiled 2 685 to 1 468 computations (45.3% saved)

regimes222.0ms (2.6%)

Memory
38.7MiB live, 849.3MiB allocated; 61ms collecting garbage
Counts
3 → 1
13 → 3
16 → 3
23 → 3
39 → 3
41 → 3
77 → 3
Calls
Call 1
Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
Call 2
Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow.f64 (neg.f64 x.re) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) #s(approx (* -1 (* y.re (log (/ -1 x.re)))) (*.f64 y.re (log.f64 (neg.f64 x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
Call 3
Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow.f64 (neg.f64 x.re) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) #s(approx (* -1 (* y.re (log (/ -1 x.re)))) (*.f64 y.re (log.f64 (neg.f64 x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))
Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
Call 4
Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow.f64 (neg.f64 x.re) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) #s(approx (* -1 (* y.re (log (/ -1 x.re)))) (*.f64 y.re (log.f64 (neg.f64 x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) #s(approx (+ 1 (* -1 (* y.re (log (/ -1 x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (/.f64 #s(literal 1 binary64) y.re))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
Outputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
Call 5
Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow.f64 (neg.f64 x.re) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) #s(approx (* -1 (* y.re (log (/ -1 x.re)))) (*.f64 y.re (log.f64 (neg.f64 x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) #s(approx (+ 1 (* -1 (* y.re (log (/ -1 x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (/.f64 #s(literal 1 binary64) y.re))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 #s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.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))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))))
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.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))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
Outputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
Call 6
Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow.f64 (neg.f64 x.re) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) #s(approx (* -1 (* y.re (log (/ -1 x.re)))) (*.f64 y.re (log.f64 (neg.f64 x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) #s(approx (+ 1 (* -1 (* y.re (log (/ -1 x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (/.f64 #s(literal 1 binary64) y.re))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 #s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.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))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))))
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.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))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
Call 7
Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow.f64 (neg.f64 x.re) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) #s(approx (* -1 (* y.re (log (/ -1 x.re)))) (*.f64 y.re (log.f64 (neg.f64 x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (pow (+ (* x.im x.im) (* x.re x.re)) (* y.re 1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64)) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) #s(approx (+ 1 (* -1 (* y.re (log (/ -1 x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (/.f64 #s(literal 1 binary64) y.re))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (sqrt.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
(*.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) (neg.f64 y.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 #s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (sqrt.f64 (pow.f64 x.im #s(literal 2 binary64)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (sin (+ (* (neg y.re) (atan2 x.im x.re)) (* (PI) 1/2))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64))) #s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.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))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 y.re #s(literal 1/2 binary64)))))
(*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.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))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.re))) (sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(approx (exp (- (* y.im (atan2 x.im x.re)) (* y.re (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) #s(approx (exp (* -1 (* y.re (log (/ -1 x.re))))) (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re))) (+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (log.f64 (neg.f64 x.re))) y.re)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(*.f64 (*.f64 (pow.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re)) y.re) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.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 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.re))) y.im)))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 #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)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 #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)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 #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 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(approx (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (sin.f64 (-.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(*.f64 (exp.f64 (-.f64 (*.f64 #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)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 #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)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 #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)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 #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)))) 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 (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (- (+ (* (atan2 x.im x.re) y.re) (* y.im (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (* -1/2 (PI))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (+.f64 (*.f64 #s(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) (PI.f64))))))
(/.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (exp.f64 (-.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.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))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (-.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.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 (-.f64 (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)) (-.f64 (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 #s(approx (+ (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (sinh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (-.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (+.f64 #s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 #s(approx (cosh (* 1/2 (log (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (+.f64 x.re (/.f64 #s(literal 1 binary64) x.re)))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (+.f64 (cosh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (sinh.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) (*.f64 #s(literal -1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (sin.f64 (+.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (*.f64 #s(literal 1/2 binary64) y.im) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (+.f64 (*.f64 y.im (log.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (sqrt.f64 (pow.f64 x.re #s(literal 2 binary64))) #s(literal 2 binary64)))))))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64))) (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 1 binary64)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) (*.f64 (*.f64 (sin.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))))))
Outputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 #s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
Calls

16 calls:

27.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
25.0ms
x.im
25.0ms
x.re
22.0ms
y.re
22.0ms
y.im
Results
AccuracySegmentsBranch
51.7%1x.re
51.7%1y.im
51.7%1(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
51.7%1x.im
51.7%1y.re
77.9%3y.re
60.5%2x.re
78.3%3y.re
79.5%3y.re
80.0%3y.re
80.4%3y.re
72.5%3(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
78.5%3x.re
74.6%2x.im
80.8%3y.re
64.7%2y.im
Compiler

Compiled 5 237 to 622 computations (88.1% saved)

bsearch69.0ms (0.8%)

Memory
-12.0MiB live, 125.3MiB allocated; 17ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
39.0ms
1.058821357223138e-57
4.372430616025792e-48
25.0ms
-513321609519.3449
-40335450688.94975
Samples
28.0ms161×0valid
24.0ms79×1valid
Compiler

Compiled 1 498 to 896 computations (40.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 40.0ms
ival-hypot: 10.0ms (24.8% of total)
ival-cos: 9.0ms (22.3% of total)
ival-mult!: 7.0ms (17.3% of total)
ival-log: 6.0ms (14.9% of total)
adjust: 3.0ms (7.4% of total)
ival-atan2: 3.0ms (7.4% of total)
ival-exp: 2.0ms (5.0% of total)
ival-add!: 1.0ms (2.5% of total)
ival-sub!: 1.0ms (2.5% of total)

bsearch36.0ms (0.4%)

Memory
24.0MiB live, 68.5MiB allocated; 8ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
2.0ms
1.058821357223138e-57
4.372430616025792e-48
32.0ms
-8.036026291912184e+20
-2774581400436465700.0
Samples
13.0ms44×1valid
9.0ms84×0valid
Compiler

Compiled 1 810 to 1 058 computations (41.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 17.0ms
ival-mult!: 4.0ms (23.1% of total)
ival-hypot: 3.0ms (17.4% of total)
ival-log: 3.0ms (17.4% of total)
adjust: 2.0ms (11.6% of total)
ival-atan2: 2.0ms (11.6% of total)
ival-cos: 2.0ms (11.6% of total)
ival-exp: 1.0ms (5.8% of total)
ival-add!: 0.0ms (0.0% of total)
ival-sub!: 0.0ms (0.0% of total)

bsearch14.0ms (0.2%)

Memory
-38.5MiB live, 10.5MiB allocated; 16ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
2.0ms
1.058821357223138e-57
4.372430616025792e-48
12.0ms
-8.036026291912184e+20
-2774581400436465700.0
Compiler

Compiled 1 746 to 1 042 computations (40.3% saved)

bsearch41.0ms (0.5%)

Memory
24.4MiB live, 69.4MiB allocated; 3ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
2.0ms
1.058821357223138e-57
4.372430616025792e-48
36.0ms
-2.2928499974992032e-10
-4.963981993589074e-22
Samples
15.0ms50×1valid
14.0ms110×0valid
Compiler

Compiled 1 940 to 1 182 computations (39.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 21.0ms
ival-hypot: 4.0ms (19.2% of total)
ival-mult!: 4.0ms (19.2% of total)
ival-log: 4.0ms (19.2% of total)
ival-cos: 3.0ms (14.4% of total)
adjust: 2.0ms (9.6% of total)
ival-atan2: 2.0ms (9.6% of total)
ival-exp: 1.0ms (4.8% of total)
ival-add!: 0.0ms (0.0% of total)
ival-sub!: 0.0ms (0.0% of total)

bsearch87.0ms (1.0%)

Memory
-8.7MiB live, 147.8MiB allocated; 22ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
51.0ms
2.980528542262674e-46
8.289285848586678e-17
29.0ms
-2.2928499974992032e-10
-4.963981993589074e-22
Samples
43.0ms106×1valid
23.0ms198×0valid
Compiler

Compiled 2 372 to 1 315 computations (44.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 55.0ms
adjust: 14.0ms (25.3% of total)
ival-log: 11.0ms (19.9% of total)
ival-mult!: 9.0ms (16.3% of total)
ival-hypot: 8.0ms (14.5% of total)
ival-cos: 6.0ms (10.8% of total)
ival-atan2: 4.0ms (7.2% of total)
ival-exp: 3.0ms (5.4% of total)
ival-add!: 1.0ms (1.8% of total)
ival-sub!: 1.0ms (1.8% of total)

bsearch5.0ms (0.1%)

Memory
9.1MiB live, 9.1MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
2.0ms
2.980528542262674e-46
8.289285848586678e-17
2.0ms
-2.2928499974992032e-10
-4.963981993589074e-22
Compiler

Compiled 2 392 to 1 325 computations (44.6% saved)

derivations72.0ms (0.8%)

Memory
8.3MiB live, 101.7MiB allocated; 7ms collecting garbage
Stop Event
fuel
Compiler

Compiled 1 038 to 99 computations (90.5% saved)

preprocess81.0ms (1.0%)

Memory
-19.7MiB live, 170.4MiB allocated; 10ms collecting garbage
Compiler

Compiled 1 075 to 118 computations (89.0% saved)

end0.0ms (0.0%)

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

Profiling

Loading profile data...